Exdemo_bathymetry_1D_full {RGeostats}

R Documentation

Simulated Bathymetry

Description

Simulated Bathymetry to illustrate the conditional simulations.

Usage

data(Exdemo_bathymetry_1D_full)

Format

Object of type db-class.

Details

The object has been created with RGeostats-10.0.2 by the following commands:

Exdemo_bathymetry_1D_full=db.create(nx=10000,dx=1)

true_model=model.create(melem.name(2),range=20,ndim=1,sill=50)

true_model=model.create(melem.name(5),range=40,ndim=1,sill=500,model=true_model)

Exdemo_bathymetry_1D_full=db=simtub(,Exdemo_bathymetry_1D_full,model=true_model,nbtuba=10000,seed=456234,mean=-1386)

Exdemo_bathymetry_1D_full=db.rename(Exdemo_bathymetry_1D_full,"Simu.V1.S1","Bathymetry")

Note that Exdemo_bathymetry_1D is a subset of Exdemo_bathymetry_1D_full obtained by the following RGeostats commands:

index_obs=c(1:199,4:50*200)

Exdemo_bathymetry_1D=db.create(x1=Exdemo_bathymetry_1D_full[index_obs,2],Bathymetry=Exdemo_bathymetry_1D_full[index_obs,3])

Exdemo_bathymetry_1D=db.locate(Exdemo_bathymetry_1D,3,"z")

See Also

Exdemo_bathymetry_1D

Examples

data(Exdemo_bathymetry_1D_full)
plot(Exdemo_bathymetry_1D_full)

calcul_length=function(db,index=1)
{

x=db.extract(db,"x1")
z=db.extract(db,paste("z",index,sep=""))
sum(sqrt((x[-1]-x[-length(x)])^2+(z[-1]-z[-length(z)])^2))
}

calcul_length(Exdemo_bathymetry_1D_full)

---