我试图将回归的结果(即R2)放在图表中,但似乎无法弄清楚如何从表达式中调用变量(它粘贴变量名称).
这是我的代码.
R2Val <- signif(summary(sMod_pre90)$r.squared[1], 2)
text(92, 4, expression(paste(R^2, " = ", R2Val)), adj = 0, cex = 0.85)
Run Code Online (Sandbox Code Playgroud) 我正在尝试为对数刻度图指定x轴和y轴的下限和上限.我以为我可以使用xlim和ylim,但是我收到一条警告信息,没有情节:
1:在plot.window(...)中:非限定轴限制[GScale(-inf,3.30103,1 ,.); 日志= 1]
这是我的代码.
plot(FAS_set$ConcCalc~ZCS_set$ConcCalc,pch=21,bg="black",log="xy",xlim=c(0,2000),ylim=c(0,100000))
任何帮助,将不胜感激.
干杯.
我首先想说的是,我明白计算非线性回归的R ^ 2值并不完全正确或者是有效的事情.
然而,我正处于将SigmaPlot中的大部分工作执行到R的过渡期,对于我们的非线性(浓度 - 响应)模型,同事习惯于查看与模型相关的R ^ 2值来估计优度-of配合.
SigmaPlot使用1-(残留SS /总SS)计算R ^ 2,但在RI中似乎无法提取总SS(残留SS在摘要中报告).
当我尝试使用更好的适合度估算器时,我将非常感激任何帮助实现这一点.
干杯.
我有一个R脚本,它在多个数据集上运行一组函数,并创建一组浓度响应模型.我想要做的是将模型参数和其他结果保存到csv文件中.
我的计划是让脚本创建一个空的csv文件,然后随着脚本的进行,结果将附加到该csv文件.每次运行脚本时,我都希望覆盖结果.
我试过使用创建一个空文件
system("copy /y NUL results.csv > NUL")
Run Code Online (Sandbox Code Playgroud)
创建文件,但不创建该文件.copy/y NUL results.csv > NUL直接在Windows终端中运行时,此命令(即)可正常工作.
我错过了一些简单的事吗?系统是Windows XP.
谢谢大家!
说,我有两个清单:
list.a <- as.list(c("a", "b", "c"))
list.b <- as.list(c("d", "e", "f"))
Run Code Online (Sandbox Code Playgroud)
我想以递归方式组合这些列表,这样结果将是一个组合元素的列表,如下所示:
[[1]]
[1] a d
[[2]]
[1] a e
[[3]]
[1] a f
[[4]]
[1] b d
Run Code Online (Sandbox Code Playgroud)
等等.我觉得我在这里错过了一些相对简单的东西.有帮助吗?
干杯.
如果标题不清楚我会道歉,但我无法简洁地解释.
给定一个浓度矢量,我想将最大值四舍五入到下一个数量级(即345到1000).另外,我想将最小值舍入到较低的数量级(即3.2到1).这些浓度也可能低于1,因此例如0.034需要舍入到0.01.
有任何想法吗?
根据这个问题的答案:优雅的方法来检查丢失的包并安装它们?
我正在使用以下代码来确保在升级R或安装其他用户时安装所有软件包:
list.of.packages <- c("RODBC", "reshape2", "plyr")
new.packages <- list.of.packages[!(list.of.packages %in% installed.packages()[,"Package"])]
if(length(new.packages)) install.packages(new.packages)
Run Code Online (Sandbox Code Playgroud)
我已将它放在我的.Rprofile中的myFirst函数中,但是当我启动R时它会出现以下错误并继续启动:
Error in match(x, table, nomatch = 0L) :
could not find function "installed.packages"
Run Code Online (Sandbox Code Playgroud)
如果我在得到提示后运行代码它可以正常工作.有什么想法吗?
谢谢!
我正在自动创建一系列图表,每个图表都基于一类化学品(例如金属,PCB等); 由于我将遗漏的原因,我正在绘制情节之外的图例,并使用负值来inset为legend()函数执行此操作(例如,inset = c(-0.2, 0)).由于每个化学类需要不同的值,inset我想使用hash包创建一个哈希表来存储每个化学类所需的值.然而,为了将这些存储在散列表中,我将值的向量存储为字符串(例如,"c(-0.2,0)").
我的哈希表代码如下所示:
legend.hash <- hash(chem.class, c('c(-0.2, 0)', 'c(-0.2, 0)', 'c(-0.25, -0.4)', 'c(-0.25, -0.3)', 'c(-0.2, 0)', 'c(-0.4, -0.2)', 'c(-0.2, 0)', 'c(-0.2, 0)'))
where chem.class是化学类的向量.
从结果哈希表中检索值显然是一个字符串"c(-0.2, 0)",是否有一种转换此文本字符串的方法,以便R将其解释为可以像下面这样使用的函数:legend(..., inset = legend.hash[[chem.class[i]]])?
或者有没有更好的方法来使用传统的图形系统实现这一点?