我有一个奇怪的问题,但希望有人可以帮助我.我试图创建一个湖底的表面图,然后添加一些显示植物频率的点,以便了解整个湖泊中水生植物的位置.
现在我正在使用分别在R中的scatterplot3d和网格包在scatterplot3d和wireframe中创建表面图.为了实现我感兴趣的图表类型,我已将深度转换为负值(想象一下湖的水面在z轴上为0),然后通过纬度和经度坐标创建一个深度的黄土模型.然而,我遇到的一个问题是黄土模型预测正深度(当然,在湖中是不可能的;人们只能从深度0进入水柱).
例
x <- seq(1,100,1)
y <- seq(1,100,1)
depth <- rbeta(100, 1, 50)*100
depth <- -depth
dep.lo <- loess(depth~x*y, degree=2, span=.25) # this shows a big warning, but it works
coord.fit <- expand.grid(x=x, y=y)
coord.fit$depth <- as.numeric(predict(dep.lo, newdata=coord.fit))
range(coord.fit$depth)
# -14.041011 6.986745
正如你所看到的,我的深度从-14到接近7.有没有办法在黄土模型上设置上限,这样我的模型就不会达到这些正值？
谢谢你的帮助,
保罗
有谁知道返回R中默认工作目录的简单方法？
我知道我可以输入我的家乡路径......
setwd("C:/Users/me/Desktop")
......但我想我很懒.是否有默认命令或类似...
setwd(default)?
如果您知道答案,谢谢.
保罗