У меня есть график, который я делаю в R, и первая проблема, которую я имею, состоит в том, что мои даты не отформатированы правильно, они отформатированы как факторы, и это заставляет их отображаться в случайном порядке по оси X (очевидно, я хочу их в хронологическом порядке для временного ряда). В идеале я также хочу иметь возможность показывать только каждые 3 месяца и показывать их как месяц год в формате% B% y или в мае 2007 года, я просто не уверен, где добавить этот код в мой скрипт, кажется, он не работает везде, где добавь это ...
Спасибо, куча Анна (новичок)
Ниже приведен код, который у меня работает, но даты расположены не в хронологическом порядке по оси X, что является большой проблемой ...
> # ggplot2 library
library(ggplot2)
# The easiest way to get tidyr is to install the whole tidyverse:
library(tidyverse)
install.packages("tidyverse")
#load data or read data file, first set your working directory as the file that has your data files inside of it, to do this go to Session> Set working directory and pick the file
read.csv(file="Top25/RA_PH_0m_top25.csv", header=TRUE)
#next create a variable to read.csv the file in question
read_data1 <- read.csv(file="Top25/RA_PH_0m_top25.csv", header=TRUE)
#the easiest way to gather data is the following, gathering columns 2-9
gather(read_data1, zOTU, RA, 2:9, na.rm = FALSE, convert = FALSE)
gather_data1 <- gather(read_data1, zOTU, RA, 2:9, na.rm = FALSE, convert = FALSE)
#now you can graph the new gather_data1 in a stacked area plot
p <- ggplot(gather_data1, aes(x = Date, y = RA, group = zOTU, fill = zOTU)) +
geom_area(position="fill", color = "black")
#p <- p + scale_fill_manual(values = c("#999999", "#E69F00", "#999999", "#E69F00", "#999999", "#E69F00",
# "#999999", "#E69F00", "#999999", "#E69F00", "#999999", "#E69F00",
# "#999999", "#E69F00", "#999999", "#E69F00", "#999999", "#E69F00",
# "#999999", "#E69F00", "#999999"))
p
