* using log directory 'd:/Rcompile/CRANpkg/local/2.11/CircSpatial.Rcheck'
* using R version 2.11.1 Patched (2010-07-29 r52657)
* using session charset: ISO8859-1
* checking for file 'CircSpatial/DESCRIPTION' ... OK
* checking extension type ... Package
* this is package 'CircSpatial' version '1.0-1'
* checking package dependencies ... OK
* checking if this is a source package ... OK
* checking whether package 'CircSpatial' can be installed ... OK
* checking package directory ... OK
* checking for portable file names ... OK
* checking DESCRIPTION meta-information ... OK
* checking top-level files ... OK
* checking index information ... OK
* checking package subdirectories ... OK
* checking R files for non-ASCII characters ... OK
* checking R files for syntax errors ... OK
* checking whether the package can be loaded ... OK
* checking whether the package can be loaded with stated dependencies ... OK
* checking whether the package can be unloaded cleanly ... OK
* checking for unstated dependencies in R code ... OK
* checking S3 generic/method consistency ... OK
* checking replacement functions ... OK
* checking foreign function calls ... OK
* checking R code for possible problems ... NOTE
CircDataimage: no visible binding for '<<-' assignment to
  'CircDataimageGlobals'
CircDataimage : R1.Prime: no visible binding for '<<-' assignment to
  'CircDataimageGlobals'
CircDataimage : R1.Prime: no visible binding for global variable
  'CircDataimageGlobals'
CircDataimage : R1.WriteBinColorVectors: no visible binding for '<<-'
  assignment to 'CircDataimageGlobals'
CircDataimage : R1.WriteBinColorVectors: no visible binding for global
  variable 'CircDataimageGlobals'
CircDataimage : R1.WriteContColorVectors: no visible binding for global
  variable 'CircDataimageGlobals'
CircDataimage : R1.WriteContColorVectors: no visible binding for '<<-'
  assignment to 'CircDataimageGlobals'
CircDataimage : R1.Initialize: no visible binding for '<<-' assignment
  to 'CircDataimageGlobals'
CircDataimage : R1.Initialize: no visible binding for global variable
  'CircDataimageGlobals'
CircDataimage : R1.SubsetColorScale: no visible binding for '<<-'
  assignment to 'CircDataimageGlobals'
CircDataimage : R1.SubsetColorScale: no visible binding for global
  variable 'CircDataimageGlobals'
CircDataimage : R1.PlotImage: no visible binding for global variable
  'CircDataimageGlobals'
CircDataimage : R1.PlotArrows: no visible binding for global variable
  'CircDataimageGlobals'
CircDataimage : R1.PlotMask: no visible binding for global variable
  'CircDataimageGlobals'
CircDataimage : R1.PlotWheel: no visible binding for global variable
  'CircDataimageGlobals'
CircDataimage : R1.Pan: no visible binding for '<<-' assignment to
  'CircDataimageGlobals'
CircDataimage : R1.Pan: no visible binding for global variable
  'CircDataimageGlobals'
CircDataimage : R1.ChangeColorWheel: no visible binding for global
  variable 'CircDataimageGlobals'
CircDataimage : R1.ChangeColorWheel: no visible binding for '<<-'
  assignment to 'CircDataimageGlobals'
CircDataimage : R1.AutoRotateColorWheel: no visible binding for global
  variable 'CircDataimageGlobals'
CircDataimage : R1.AutoRotateColorWheel: no visible binding for '<<-'
  assignment to 'CircDataimageGlobals'
CircDataimage : R1.RotateColorWheel: no visible binding for global
  variable 'CircDataimageGlobals'
CircDataimage : R1.RotateColorWheel: no visible binding for '<<-'
  assignment to 'CircDataimageGlobals'
CircDataimage : R1.ChangeColorGap: no visible binding for global
  variable 'CircDataimageGlobals'
CircDataimage : R1.ChangeColorGap: no visible binding for '<<-'
  assignment to 'CircDataimageGlobals'
CircDataimage : <anonymous>: no visible binding for global variable
  'CircDataimageGlobals'
CircDataimage : ChangeColor: no visible binding for '<<-' assignment to
  'CircDataimageGlobals'
CircDataimage : ChangeColor: no visible binding for global variable
  'CircDataimageGlobals'
CircDataimage : <anonymous>: no visible binding for '<<-' assignment to
  'CircDataimageGlobals'
CircDataimage : Smooth.function: no visible binding for global variable
  'CircDataimageGlobals'
CircDataimage : Smooth.function: no visible binding for '<<-'
  assignment to 'CircDataimageGlobals'
CircDataimage : arrow.cb.function: no visible binding for '<<-'
  assignment to 'CircDataimageGlobals'
CircDataimage : arrow.cb.function: no visible binding for global
  variable 'CircDataimageGlobals'
CircDataimage : arrow.function: no visible binding for '<<-' assignment
  to 'CircDataimageGlobals'
CircDataimage : arrow.function: no visible binding for global variable
  'CircDataimageGlobals'
CircDataimage : mask.cb.function: no visible binding for global
  variable 'CircDataimageGlobals'
CircDataimage : mask.cb.function: no visible binding for '<<-'
  assignment to 'CircDataimageGlobals'
* checking Rd files ... OK
* checking Rd metadata ... OK
* checking Rd cross-references ... OK
* checking for missing documentation entries ... OK
* checking for code/documentation mismatches ... OK
* checking Rd \usage sections ... OK
* checking Rd contents ... OK
* checking data for non-ASCII characters ... OK
* checking examples ... ERROR
Running examples in 'CircSpatial-Ex.R' failed.
The error most likely occurred in:

> ### * InterpDirection
> 
> flush(stderr()); flush(stdout())
> 
> ### Name: InterpDirection
> ### Title: Interpolate Circular-Spatial Model
> ### Aliases: InterpDirection
> ### Keywords: arith spatial
> 
> ### ** Examples
> 
> ## Construct Trend Model of 121 locations
> x1<- 1:11; y1 <- 1:11; y1 <- rep(y1, 11); x1 <- rep(x1, each=11)
> model.direction1 <- matrix(data=c(
+   157, 141, 126, 113, 101, 90, 79, 67, 54, 40, 25, 152, 137, 123, 111,
+   100, 90, 80, 69, 57, 44, 30, 147, 133, 120, 109,  99, 90, 81, 71, 60,
+   48, 35, 142, 129, 117, 107,  98, 90, 82, 73, 63, 52, 40, 137, 125, 114,
+   105,  97, 90, 83, 75, 66, 56, 45, 132, 121, 111, 103,  96, 90, 84, 77,
+   69, 60, 50, 127, 117, 108, 101,  95, 90, 85, 79, 72, 64, 55, 122, 113,
+   105,  99,  94, 90, 86, 81, 75, 68, 60, 117, 109, 102,  97,  93, 90, 87,
+   83, 78, 72, 65, 112, 105,  99,  95,  92, 90, 88, 85, 81, 76, 70, 107,
+   101,  96,  93,  91, 90, 89, 87, 84, 80, 75), ncol=11, byrow=TRUE)
> model.direction1 <- as.vector(model.direction1)*pi/180
> 
> ## Compute vM CRF of 121 observations, Rho=sqrt(0.5) so sill about 0.5,
> ## from GRF (Range=4, spherical covariance).
> set.seed(666)
> crf1<- SimulateCRF(CircDistr="vM", Rho=sqrt(0.5), Range=4,
+   CovModel="spherical", Grid=cbind(x1, y1), OverFit=TRUE)
> 
> # Make sample
> sample.direction1 <- model.direction1 + crf1$direction
> 
> ## Fit An Appropriate Model
> FitHoriz1 <- lm(cos(sample.direction1) ~ (x1 + y1))
> FitVert1 <- lm(sin(sample.direction1)  ~ (x1 + y1))
> fitted.direction1 <- atan2(FitVert1$fitted.values,
+   FitHoriz1$fitted.values)
> 
> ## Compute Residuals
> resids1 <- CircResidual(X=x1, Y=y1, Raw=sample.direction1,
+   Trend=fitted.direction1, Plot=FALSE)
> 
> ## Fit cosine Models
> ## Fit of exponential with range=4 and sill=.56 adequate
> CosinePlots(x=resids1$x, y=resids1$y, directions=resids1$direction,
+   Lag.n.Adj=1, BinWAdj=1, Plot=TRUE, Cloud=FALSE, Model=TRUE, nugget=0,
+   Range=4.0,  sill=0.56, x.legend=.2, y.legend=0.4, xlim=c(0,8),
+   ylim=c(0,1))
> 
> ## Krig to residuals using cosine model
> x2 <- seq(3,6, by=0.1); n <- length(x2)
> y2 <- x2; y2 <- rep(y2, n)
> x2 <- rep(x2, each=n); rm(n)
> krig2 <- KrigCRF(krig.x=x2, krig.y=y2, resid.x=resids1$x,
+   resid.y=resids1$y, resid.direction=resids1$direction, Model = 
+   "exponential", Nugget=0.0, Range=4, sill=0.56, Plot=FALSE)
Error in match.arg(fctcall) : 
  'arg' should be one of "Cov", "Variogram", "CovMatrix"
Calls: KrigCRF ... cbind -> cbind -> CovarianceFct -> Covariance -> match.arg
Execution halted