没有花哨的阴影,但这应该给你一个主意
d<-rep(1:5,each=10)
M<-代表((0:9)*144,5)
V<-sin(序列(0,1,length.out=50)*2*pi*5)+(1:50)/50
温度矩阵(v,ncol=10,byrow=true)
par(mar=c(2,2,2,2)
日<-唯一(D)
TOD<-唯一(m)/60
汗珠(天,tod,温度,theta=50,phi=20,
ticktype=“detailed”,ylab=“一天中的时间(hr)”)
基本上,将温度值分布在一个矩阵中,该矩阵的尺寸取自日期和分钟向量。
我永远记不清它是不是byrow=true还是false,以及哪个向量决定了哪个维度,所以我只需用眼睛检查并更改内容,直到它看起来正确。
其他一些选择
library(plot3d)persp()的扩展
persp3d(天,tod,温度,theta=50,phi=20)
library(rgl)也与persp()相似,但是是交互式的
persp3d(天,tod,温度,col=cm.颜色(100))
从本质上讲,你将温度值分布在一个矩阵中,这个矩阵的尺寸取自日期和分钟向量。
我不太记得是不是byrow=TRUE或FALSE,哪个向量决定了哪个维度,所以我只需要用眼睛检查,然后把事情向上改变,直到它看起来正确为止。
其他一些选择
library(plot3D) # an extension of persp()
persp3D(day, tod, temperature, theta=50, phi=20)
library(rgl) # also similar to persp(), but interactive
persp3d(day, tod, temperature, col=cm.colors(100))
