Question

我需要图表

sat -0.038685744            
sun -0.004397419            
mon -0.072163337            
tue 0.123328564         
wed 0.021875962         
thu 0.005030862         
fri 0.002869955

但r-graph-gallery上的步骤令人困惑，所以有人可以帮助我使用一个简单的图表来显示ggplot2中x轴上的星期几吗？

Answer 1

下次以可重复的方式呈现数据，以便其他人不会再次重新输入数据。

# your data 
df <- tribble(
  ~week_day, ~value,
  "sat", -0.038685744,            
  "sun", -0.004397419,           
  "mon", -0.072163337,            
  "tue", 0.123328564,         
  "wed", 0.021875962,         
  "thu", 0.005030862,         
  "fri", 0.002869955 
)
df

ordered <- c("sun", "mon", "tue", "wed", "thu", "fri", "sat")
df$week_day <- factor(df$week_day, levels = ordered)

ggplot(df, aes(x = week_day, y = value, group = 1)) +
  geom_point() +
  geom_line()

[代码根据Gregor的建议调整]

Answer 2

以下是我将您的示例数据转换为数据框的方法（尽管下次您真的应该使用dput来共享数据）：

df = read.table(text = "
            sat -0.038685744            
            sun -0.004397419            
            mon -0.072163337            
            tue 0.123328564         
            wed 0.021875962         
            thu 0.005030862         
            fri 0.002869955 ")
colnames(df) = c("day", "thing")

以下是我将数据框转换为条形图的方法：

library(ggplot2)
ggplot(df, aes(day, thing)) + geom_bar(stat = "identity")

如何制作基本的ggplot2时间序列图

2 个答案: