R非网格填充轮廓

Question

我有一组数据，我正在尝试创建一个表面图。我有一个x，y点和一个颜色。

我可以用点着色创建一个xy图，但我找不到用我的数据创建表面图的方法。数据不在正常网格上，如果可能的话，我宁愿不对其进行标准化（或者我可以使用非常精细的网格）。

数据不会在半径= 1的圆圈之外，因此这部分需要为空白。

代码和情节如下所示。

我尝试过使用contour, filled.contour以及surface3d（不是我想要的）。我对R中的许多软件包并不熟悉，所以我甚至不确定从哪里开始查找这些信息。

任何有关创建此剧情的帮助都将不胜感激。

感谢， 戈登

dip<-data.frame(dip=seq(0,90,10))
ddr<-data.frame(ddr=seq(0,350,10))
a<-merge(dip,ddr)
a$colour<-hsv(h=runif(nrow(a)))

degrees.to.radians<-function(degrees){
  radians=degrees*pi/180
  radians
}

a$equal_angle_x<-sin(degrees.to.radians(a$ddr))*tan(degrees.to.radians((90-a$dip)/2))
a$equal_angle_y<-cos(degrees.to.radians(a$ddr))*tan(degrees.to.radians((90-a$dip)/2))

plot(a$equal_angle_x,a$equal_angle_y,col=a$colour,lwd=10)

关于我试图创建的情节如下。我相信第一条评论中的链接应该让我到达我想去的地方。