我对R和ggplot2有些新意,所以这个问题可能有点低级.但是我做了大量的实验并且没有在网上找到答案,所以我想我会问这里.
当我向图表添加 alpha时,图表显示如下:
但是,无论我如何更改 alpha的值,我都无法在图表中进行任何更改.我尝试了alpha = .9和alpha = 1/10000,并且图中没有任何差异.
但似乎'alpha'一词正在做点什么.当我从代码中删除 'alpha'时,我得到以下图表:
这是我的代码.谢谢!
library(ggplot2)
library(chron)
argv <- commandArgs(trailingOnly = TRUE)
mydata = read.csv(argv[1])
png(argv[2], height=300, width=470)
timeHMS_formatter <- function(x) { # Takes time in seconds from midnight, converts to HH:MM:SS
h <- floor(x/3600)
m <- floor(x %% 60)
s <- round(60*(x %% 1)) # Round to nearest second
lab <- sprintf('%02d:%02d', h, m, s) # Format the strings as HH:MM:SS
lab <- gsub('^00:', '', …我正在制作一个输出星期几的功能,给出自1970年1月1日以来的一些天.当函数是一个if then语句链时,函数工作正常,但我想在向量上使用函数,所以我需要构建这个看起来很愚蠢的ifelse语句链.
不幸的是,我一直收到这个错误:
Error in ifelse(rem == 0, day = "Thursday", ifelse(rem == 1, day = "Friday", :
unused argument(s) (day = "Thursday")
Calls: dayFinder -> ifelse
Execution halted
我一直无法弄清楚如何绕过它 - 看起来它只是忽略then了ifelse声明的一部分.我已尝试向其提供各种样本数据集或数据点,但无法修复错误.
这是我的代码 - 提前谢谢.
dayFinder <- function(x){
#Assuming that '0' refers to January 1 1970
#Store given number
start <- x
#Initialize variable
day="Halloween"
#Divide x by 7 and store remainder
rem <- x%%7
#Determine the day
ifelse(rem==0, day="Thursday",
ifelse (rem==1, …