grid = db.create(nx=c(100,100)) # Grid data set
model = model.create(vartype="Cubic",range=30) # Creating a Cubic model
grid = simtub(grid,model) # Non-conditional simulation
anam = anam.fit(grid) # Produce the anamorphosis from the initial variable and store in the object 'anam'
aux = db.create(nx=1000,dx=8/1000,x0=-4) # Creating a regular 1D data set with X-coordinates varying from -4 to 4
aux = db.add(aux,z1=x1) # Duplicating the coordinate as the variable (Z-locator)
aux = anam.z2y(anam,aux) # Perform the transformation of the variable using the anamorphosis function
plot(aux[,"Gaus*"],aux[,3],cex=0,ylim=c(-1.8,3.6),type="l")
Return to Other Troubleshooting
Users browsing this forum: No registered users and 5 guests