Mutate 语句无法启用图形

编程问答 2022-04-29

问题描述

通过太阳黑子数据的 tidyverse 时间序列示例，当我尝试以 10 年为增量绘制图形时收到以下错误消息，似乎无法识别在步骤 1 中创建的新日期变量，想知道这是否是格式问题.
错误：mutate() 列 decade 有问题。 我decade = f(date)。 x 下标越界

感谢任何帮助

# libraries
library(datasets)
library(tidyverse)
library(tsibble)
library(ggplot)

# Tidy the data
tidy_ts <- sunspots %>%  
  as_tsibble() %>%        # Convert to timeseries tibble
  mutate(                 # Create new variables
    year = year(index),# Create a year column
    month = month(index)  # Create a month column
  ) %>%
    select(                 # Select,reorder,rename vars
        date = index,# Rename "index" to "date"
        year,# Use "year" as second variable
        month,# Use "month" as third variable
        spots = value         # Rename "value" as "spots"
    ) %>%
    print()                 # Show data
view(tidy_ts)

# Graph the tidy data by decade
tidy_ts %>%
  index_by(                            # By decade
    decade = ~ floor_date(tidy_ts$date,years(10))
  ) %>%
  summarise(mean_s = mean(spots)) %>%  # Mean for decade
  ggplot(aes(decade,mean_s)) +        # Plot means
  geom_point() +                       # Scatterplot
  geom_smooth() +                      # Smoother
  ylab("Sunspots: Mean by Decade")     # Label

解决方法

暂无找到可以解决该程序问题的有效方法，小编努力寻找整理中！

如果你已经找到好的解决方法，欢迎将解决方案带上本链接一起发送给小编。

小编邮箱:dio#foxmail.com (将#修改为@）

mutatemutaterrtimeseriescharttsibble