我对R很新,我试图在ggplot中绘制一些数据。我一直在寻找其他几个答案,我无法弄清楚为什么其他答案对我的情况不起作用。
我正在尝试使用rbind绘制一个数据帧,它是4个数据帧的组合。它们都具有相同数量的列和相同的格式。
让我们说例如它看起来像这样
Name Day Daily_Poten_V I_uAmp
1 Andy 1 .21 2
2 Andy 5 .45 3
3 Red 1 .74 2
4 Red 5 .53 5
5 Lola 1 .32 6
6 Lola 6 .21 2
7 Kyla 1 .23 1
8 Kyla 3 .45 2
我可以使用x = Day和y = Daily_Poten_V的ggplot创建一个情节,但是当我尝试绘制x = Day和y =' Daily I_uAmp'我得到错误"提供给连续比例的离散值"
这些是我运行的实际代码行:
library(dplyr)
library(lubridate)
library(ggplot2)
library(scales)
library(reshape2)
还有许多其他编码,它给了我下一节中调用的最终表格。
y_zero <- 0
all_reactors <-rbind(Andy_table, Red_table, Lola_table, Kyla_table)
p_voltage <- ggplot(all_reactors,
aes(x=Day, y='Daily I_uAmp', colour=Reactor)) +
theme_bw() +
scale_y_continuous(breaks = seq(0, 500, by = 20), limits = c(0, 500)) +
theme(panel.grid.major = element_blank(), panel.grid.minor = element_blank(), plot.title=element_text(hjust=0.5), axis.text=element_text(size=14), axis.title=element_text(size=14,face="bold"), legend.position="bottom") +
ylab("Current (uA)") +
xlab("Day") +
geom_point()
p_anpot <- ggplot(all_reactors,
aes(x=Day, y=Daily_Poten_V, colour=Reactor)) +
ylab("Anode Potential (V)") +
xlab("Day") +
theme_bw() +
theme(panel.grid.major = element_blank(), panel.grid.minor = element_blank(), plot.title=element_text(hjust=0.5), axis.text=element_text(size=14), axis.title=element_text(size=14,face="bold"), legend.position="bottom") +
scale_y_continuous(breaks = seq(-0.5, 0.5, by = 0.1), limits = c(-.5, 0.5))+
geom_hline(aes(yintercept=y_zero)) +
geom_point()
p_anpot显示我想要的图形,p_voltage给出错误。当我尝试给出y比例限制时,错误确实会出现。如果我运行没有scale_y_continous的代码行,那么我得到一个图但是没有y轴点,只有一条直线穿过0.我假设我在某处有一些大点并且需要放大但是当我这样做时它没有&# 39;似乎工作。
感谢任何建议!