r - 将月转换为年

Question

我试图弄清楚如何将年龄转换为年数。我已经阅读了一些问题，但似乎还没有找到答案。

library(Stat2Data)
data("Kids198")
glimpse(Kids198)

kidsGraph <- 
  ggplot(data = Kids198,
         aes(
         x = Age,
         y = Height,
         color = as.factor(Sex),
         )) +
  ggtitle("Boys and Girls Height by Age"
         ) +
  scale_color_manual(
    values = c("Orchid", "Dark Blue"), 
    name = "Gender", 
    labels = c("Female", "Male")
    ) +
  labs(
    x = "Age (years)",
    y = "Height (inches)"
  ) +
  scale_x_continuous() +
  theme_classic() +
  geom_point() +
  geom_smooth()
  

kidsGraph

非常感谢你的帮助！

标签： rggplot2

Answer 1

您可以将该Age值除以 12。

library(ggplot2)

Kids198$Age <- Kids198$Age/12

ggplot(data = Kids198,
       aes(
         x = Age,
         y = Height,
         color = as.factor(Sex),
       )) +
  ggtitle("Boys and Girls Height by Age"
  ) +
  scale_color_manual(
    values = c("Orchid", "Dark Blue"), 
    name = "Gender", 
    labels = c("Female", "Male")
  ) +
  labs(
    x = "Age (years)",
    y = "Height (inches)"
  ) +
  scale_x_continuous() +
  theme_classic() +
  geom_point() +
  geom_smooth()