R中的3D极坐标图

Question

我使用ggplot2为我的数据绘制了极坐标。

我的数据集是这种格式：

 Time    Lat    Long   Act
 18:00  21.05   70.00  feed
 18:45  21.00   75.00  walk
 19:00  21.09   77.00  walk
 19:05  24.98   77.09  rest

代码：

library(ggplot2)
plot.new()

ggplot(aes(x = Lat, y = Long, colour = Act), data = file) + 
geom_point() 
ggplot(aes(x= Lat, y = Long , colour = Act), data = file) + 
geom_point() + 
coord_polar(theta = "y")

这是我得到的极坐标图： here

这个地块有纬度和经度。现在我想再增加一个维度“时间”。我怎样才能做到这一点 ？。如何在 3D 极坐标图中制作这个 2D 极坐标图？

Answer 1

您可以尝试使用变量“时间”的值来缩放点的大小。不幸的是，您的示例无法重现，但类似的方法可能会起作用：

ggplot(aes(x= Latitude, y = Longitude , colour = ACTIVITY, size=time), data = Data) + geom_point(shape=21) + coord_polar(theta = "y") + scale_size_area(max_size=10)

您可以在下面看到一个可重现的示例，该示例基于 Winston Chang 的“The R Graphics Cookbook”（O'Reilly 2013）中使用的数据。

在这种情况下，点的大小代表温度，颜色代表风速类别，风向以极坐标绘制，半径为风的平均值。

library(gcookbook)
library(ggplot2)
p <- ggplot(wind, aes(x=WindDir, y=WindAvg, size=Temp, fill=SpeedCat)) +
     coord_polar() + geom_point(shape=21)+scale_size_area(max_size=10) +
     scale_x_continuous(limits=c(0,360),breaks=seq(0,360,by=45))

这是输出：

希望这会有所帮助。