使用 ggplot2 在 R 中的条形图上放置标签
Putting labels on a bar chart in R with ggplot2
我在 ggplot2 的条形图上插入标签时遇到了一些麻烦。
到目前为止,我已经能够创建条形图了。
Pizza_bar <- ggplot(Pizza_Data_Research_Rockstar, aes(Number_of_times_eaten_pizza))
Times_eaten_pizza_7_days_bar <- Pizza_bar + geom_bar()
Times_eaten_pizza_7_days_bar
不知道如何为 tbl_df/tbl/data.frame 类型的对象自动选取比例。默认为连续。
挑战变成了标记不同类别的计数。由于我是 R 的新手,我去搜索代码示例但不断收到错误消息。
ggplot(Pizza_Data_Research_Rockstar, aes(x= Number_of_times_eaten_pizza, y = count))+
geom_bar(stat = "identity", fill = "steelblue") +
geom_text(aes(label=count), vjust=-0.3, size=3.5) +
theme_minimal()
Don't know how to automatically pick scale for object of type
tbl_df/tbl/data.frame. Defaulting to continuous. Don't know how to
automatically pick scale for object of type function. Defaulting to
continuous. Error in (function (..., row.names = NULL, check.rows =
FALSE, check.names = TRUE, : arguments imply differing number of
rows: 46, 0
这是我距离添加标签最近的一次。
有人可以帮忙吗?谢谢。
路易斯
我实在看不懂你的数据,所以我自己编的:
Days = c("Monday", "Tuesday", "Thursday", "Friday")
Pizzas = c(40, 50, 10, 25)
Pizzadf = as.data.frame(cbind(Days, Pizzas))
Pizzadf$Pizzas = as.numeric(as.character(Pizzadf$Pizzas))
Pizzadf
ggplot(data = Pizzadf, aes(x = Days, y = Pizzas))+
geom_bar(stat = "identity", fill = "steelblue") +
geom_text(aes(label=Pizzas), vjust=-0.3, size=3.5) +
theme_minimal()
尝试修改调整
我在 ggplot2 的条形图上插入标签时遇到了一些麻烦。
到目前为止,我已经能够创建条形图了。
Pizza_bar <- ggplot(Pizza_Data_Research_Rockstar, aes(Number_of_times_eaten_pizza))
Times_eaten_pizza_7_days_bar <- Pizza_bar + geom_bar()
Times_eaten_pizza_7_days_bar
不知道如何为 tbl_df/tbl/data.frame 类型的对象自动选取比例。默认为连续。
挑战变成了标记不同类别的计数。由于我是 R 的新手,我去搜索代码示例但不断收到错误消息。
ggplot(Pizza_Data_Research_Rockstar, aes(x= Number_of_times_eaten_pizza, y = count))+
geom_bar(stat = "identity", fill = "steelblue") +
geom_text(aes(label=count), vjust=-0.3, size=3.5) +
theme_minimal()
Don't know how to automatically pick scale for object of type tbl_df/tbl/data.frame. Defaulting to continuous. Don't know how to automatically pick scale for object of type function. Defaulting to continuous. Error in (function (..., row.names = NULL, check.rows = FALSE, check.names = TRUE, : arguments imply differing number of rows: 46, 0
这是我距离添加标签最近的一次。
有人可以帮忙吗?谢谢。
路易斯
我实在看不懂你的数据,所以我自己编的:
Days = c("Monday", "Tuesday", "Thursday", "Friday")
Pizzas = c(40, 50, 10, 25)
Pizzadf = as.data.frame(cbind(Days, Pizzas))
Pizzadf$Pizzas = as.numeric(as.character(Pizzadf$Pizzas))
Pizzadf
ggplot(data = Pizzadf, aes(x = Days, y = Pizzas))+
geom_bar(stat = "identity", fill = "steelblue") +
geom_text(aes(label=Pizzas), vjust=-0.3, size=3.5) +
theme_minimal()
尝试修改调整