RFfractaldim(x, y = NULL, z = NULL, data, grid,
bin= seq(min(ct$x[2, ]) / 2,
min(ct$x[2,] * ct$x[3,] / 4, vario.n * min(ct$x[2,]) + 1),
min(ct$x[2,])),
vario.n=5,
sort=TRUE,
fft.m = c(65, 86), ## in fft.max.length=Inf, fft.max.regr=150000,
fft.shift = 50, # in method=c("variogram", "fft"), mode=c("plot", "interactive"),
pch=16, cex=0.2, cex.main=0.85,
printlevel = RFoptions()$general$printlevel,
height=3.5,
...)
x
is not given a grid with unit grid length is assumedx
,
y
, and z
should be
interpreted as a grid definition, see Details. grid
does not apply for T
.vario.n
value of the empirical variogram
are used for the regression fit that are not NA
.TRUE
then the coordinates are permuted
such that the largest grid length is in x
-direction; this is
of interest for algorithms that slice higher dimensional fields
into one-dimensional sections.fft.max.length
. For each piece the FFT is
calculated and then the average for all pieces is taken. The pieces
may overlap, see the argument fft.shift
.fft.m
is too large, parts of the
regression fit will take a very long time.
Therefore, the regression fit is calculated only if the number points
given by fft.m
is less than fft.max.regr
.fft.max.length
] and defines the overlap of the pieces defined
by fft.max.length
. If fft.shift=50
the WOSA estimator is
given; if fft.shift=100
no overlap exist.'nographics'
, 'plot'
, or 'interactive'
:
[object Object],[object Object],[object Object]
Usually only one mode is given. Two modes may make sense
in the combination c("pl
pch
.printlevel
is 0 nothing is
printed. If printlevel=1
error messages are printed.
If printlevel=2
warnings and the regression results
are given. If printlevel>2
tracing information is givenvario
, fft
corresponding to
the 2 methods given in the Details.Each of the elements is itself a list that contains the following elements.
NULL
or the restricted x-coordinates given
by the user in the interactive plotNULL
or y-coordinates according to x.u
NULL
or the return list of
x.u
and y.u
NULL
or the fractal dimension corresponding to the
user's regression lineRFoptions(seed=0) ## *ANY* simulation will have the random seed 0; set
## RFoptions(seed=NA) to make them all random again
x <- seq(0, 10, if (interactive()) 0.001 else 1)
z <- RFsimulate(RMexp(), x)
if (interactive()) str(RFfractaldim(data=z))
FinalizeExample()
Run the code above in your browser using DataLab