Question

我有一个数据框，我想将其转换为雷达图。目前，我只能在图表上显示点，但也希望将它们连接起来。

以下是示例数据集：

u_df <- data.frame(a = 8, b = 9, c = 8, d = 5, e = 7)
u_df_transposed <- user_df %>% 
    gather(key = 'Attributes', value = "Scores", a:e) 

ggplot(u_df_transposed, aes(x= Attributes, y = Scores)) + geom_point() + coord_polar()

理想情况下，我想要一个类似于“属性”列中每个变量的比例尺为1到10的雷达图的图。

最简单的方法是什么？谢谢！

Answer 1

要连接您的观察结果，只需将geom_path()添加到ggplot对象。要在径向轴上强制断裂，请添加 scale_y_continuous()：

plt <- ggplot(u_df_transposed, aes(x= Attributes, y = Scores))
plt <- plt + geom_path() + geom_point()
plt <- plt + scale_y_continuous(breaks=seq(min(u_df_transposed$Scores), max(u_df_transposed$Scores), 10))
# if the breaks do not need to be flexible:
# plt <- plt + scale_y_continuous(breaks=1:10))
plt <- plt + coord_polar()
plt

连接ggplot2中的coord_polar图上的点

1 个答案: