小编N B*_*wer的帖子

加载工作区时出现"错误的幻数"错误以及如何避免错误?

我试图加载我的R工作区并收到此错误:

Error: bad restore file magic number (file may be corrupted) -- no data loaded
In addition: Warning message:
file ‘WORKSPACE_Wedding_Weekend_September’ has magic number '#gets'
   Use of save versions prior to 2 is deprecated 
Run Code Online (Sandbox Code Playgroud)

我对技术细节并不特别感兴趣,但主要是我如何引起它以及如何在将来阻止它.以下是有关情况的一些注意事项:

  1. 我在一个在训练营分区上运行Windows XP的MacBook Pro上运行R 2.15.1.
  2. 这个工作区文件有明显的错误,因为它的重量只有~80kb,而我的其他文件通常都超过10,000
  3. 在周末,我在R中运行外部建模程序并将其输出存储到不同的对象.我在几天的过程中运行了几次模型迭代,例如output_Saturday < - call_model()
  4. 模型输出没有什么特别之处,它只是一个包含beta用于插槽,VC矩阵,模型规范等的列表.

workspace r magic-numbers

77
推荐指数
7
解决办法
12万
查看次数

将颜色和形状的图例组合成一个图例

我正在使用2 x 2研究设计在ggplot中创建一个情节,并希望使用2种颜色和2种符号来分类我的4种不同的治疗组合.目前我有2个传说,一个用于颜色,一个用于两个形状.如何将它们组合成单个图例,以便我有一个蓝色圆圈,一个红色圆圈,一个蓝色三角形和一个读取三角形?

一些数据:

state1 <- c(rep(c(rep("N", 7), rep("Y", 7)), 2))
year <- rep(c(2003:2009), 4)
group1 <- c(rep("C", 14), rep("E", 14))
group2 <- paste(state1, group1, sep = "")
beta <- c(0.16,0.15,0.08,0.08,0.18,0.48,0.14,0.19,0.00,0.00,0.04,0.08,0.27,0.03,0.11,0.12,0.09,0.09,0.10,0.19,0.16,0.00,0.11,0.07,0.08,0.09,0.19,0.10)
    lcl <- c(0.13,0.12,0.05,0.05,0.12,0.35,0.06,0.13,0.00,0.00,0.01,0.04,0.20,0.00,0.09,0.09,0.06,0.06,0.07,0.15,0.11,0.00,0.07,0.03,0.05,0.06,0.15,0.06)
    ucl <- c(0.20,0.20,0.13,0.14,0.27,0.61,0.28,0.27,0.00,1.00,0.16,0.16,0.36,0.82,0.14,0.15,0.13,0.13,0.15,0.23,0.21,0.00,0.15,0.14,0.12,0.12,0.23,0.16)
data <- data.frame(state1,year,group1,group2,beta,lcl,ucl)
Run Code Online (Sandbox Code Playgroud)

情节:

library(ggplot2)
pd <- position_dodge(.65)
ggplot(data = data, aes(x = year, y = beta, colour = state1, group = group2, shape = group1)) +
  geom_point(position = pd, size = 4) +
  geom_errorbar(aes(ymin = lcl, ymax = ucl),colour = "black", width …
Run Code Online (Sandbox Code Playgroud)

r ggplot2

65
推荐指数
2
解决办法
6万
查看次数

R函数fits()和predict()之间有区别吗?

功能fitted()predict()?之间有区别吗?我注意到lme4的混合模型可以使用fitted()但不能predict().

r

43
推荐指数
2
解决办法
4万
查看次数

在RMarkdown文档中调整使用kable()创建的表的宽度

在knitr中使用kable()函数创建表时,是否可以调整列的宽度?

对于具有两列的表,这样的块产生一个占据文档整个宽度的表.我想让列更窄. 这可以用kable()完成还是需要另一个包?

这个rmarkdown块

```{r}
df <- data.frame(x = 1:10,
           y = 11:20)
library(knitr)
kable(df)
```
Run Code Online (Sandbox Code Playgroud)

生成此表 在此输入图像描述

左对齐kable(df, align = "l")有点帮助,但我希望两列彼此相邻.

r knitr r-markdown

20
推荐指数
3
解决办法
2万
查看次数

具有交叉分类组的ggplot中的箱线图宽度

我正在使用ggplot制作箱图,其数据按2个因子变量分类.我想让盒子尺寸反映样品尺寸,varwidth = TRUE但是当我这样做时盒子会重叠.

1)具有3×2结构的一些样本数据

data <- data.frame(group1= sample(c("A","B","C"),100, replace = TRUE),group2= sample(c("D","E"),100, replace = TRUE) ,response = rnorm(100, mean = 0, sd = 1))
Run Code Online (Sandbox Code Playgroud)

2)默认的箱形图:没有可变宽度的ggplot

ggplot(data = data, aes(y = response, x = group1, color = group2)) + geom_boxplot()
Run Code Online (Sandbox Code Playgroud)

在此输入图像描述

我喜欢如何显示第一级分组.
现在我尝试添加可变宽度......

3)......以及我什么时候得到的 varwidth = TRUE

ggplot(data = data, aes(y = response, x = group1, color = group2)) + geom_boxplot(varwidth = T)
Run Code Online (Sandbox Code Playgroud)

在此输入图像描述

无论是在主要调用中还是在语句中使用color = group2group = group2同时出现这种重叠.大惊小怪似乎也没有帮助.ggplotgeom_boxplotposition_dodge

4)我不喜欢的解决方案是通过组合我的group1和group2来制作独特的因素

data$grp.comb <- paste(data$group1, data$group2) …
Run Code Online (Sandbox Code Playgroud)

r ggplot2

13
推荐指数
1
解决办法
2464
查看次数

在ggplot中是否有与plot中的varwidth选项等效的?

我正在使用ggplot创建箱图,并希望表示对每个箱子有贡献的样本大小.在基本plot功能中有varwidth选项.它在ggplot中是否具有等价物?

例如,在基础图中

data <- data.frame(rbind(cbind(rnorm(700, 0,10), rep("1",700)),
                         cbind(rnorm(50, 0,10), rep("2",50))))
data[ ,1] <- as.numeric(as.character(data[,1]))
plot(data[,1] ~ as.factor(data[,2]), varwidth = TRUE)
Run Code Online (Sandbox Code Playgroud)

在此输入图像描述

plot r ggplot2

9
推荐指数
1
解决办法
1752
查看次数

当一个实例运行外部程序时,R的多个实例的稳定性如何?

我正在通过R运行一个外部程序,这个程序非常耗费内存,可能需要8个小时才能运行.我想打开R的另一个实例来执行其他任务,但我担心崩溃外部程序并且不得不重新启动进程.在这种情况下我应该期待任何问题吗?外部程序只是寡妇,我在MacBook Pro上的Bootcamp分区上运行它.

r multiple-instances

7
推荐指数
1
解决办法
1464
查看次数

增加R箱图中箱线的厚度?

如何使用基本R图或boxplot函数增加勾勒出框图"box"部分的线条的粗细?也就是说,如何加厚定义分位数的方框的线条.

对于这样的情节:

boxplot(rnorm(100,50,10), horizontal = TRUE, notch = TRUE)
Run Code Online (Sandbox Code Playgroud)

我猜我需要包含一个pars =类似的声明

boxplot(rnorm(100,50,10), horizontal = TRUE, notch = TRUE, pars = ...)
Run Code Online (Sandbox Code Playgroud)

编辑:我的关于使用的猜测pars =来自于第一眼的文档boxplot表明pars =可以调用"的(可能很多)更图形化的参数,例如,boxwex或outpch名单,这些被传递到BXP(如果情节属实)......"

plot r

7
推荐指数
2
解决办法
1万
查看次数

是否可以为 R 定义跨平台工作目录?

我正在与大量 R 本科生一起亲自教授 R 教程。我还尝试在 RPubs 上格式化我的笔记,以便其他人可以轻松使用它们。没有什么比人们错误地指定工作目录或将电子表格文件保存到与工作目录不同的地方更容易使事情脱轨的了。

是否可以定义一个跨平台通用的工作目录?例如,一行代码或类似的函数

setwd( someplace that is likely to exist on every computer)
Run Code Online (Sandbox Code Playgroud)

这可能涉及查找所有计算机上通常存在的某个位置的功能,例如桌面、下载文件夹或 R 目录。

r setwd

6
推荐指数
1
解决办法
992
查看次数

在查看数据帧的内容时是否可以截断输出?

我有一个带有一些非常长的"注释"列的数据框.当我显示它们时,它们被分成不同的块,使得难以跨行读取.是否可以更改R中的设置或修改对data.frame的调用以截断特定长度的字符串?

示例:3列数据帧

data.frame(cbind(rep(1,5),rep(c("very very long obnoxious character string here" ,"dog","cat","dog",5)),rep(c("very very long obnoxious character string here" ,"dog","cat","dog",5))))
Run Code Online (Sandbox Code Playgroud)

在我的屏幕上看到的结果数据帧:

  X1                                             X2
1  1 very very long obnoxious character string here
2  1                                            dog
3  1                                            cat
4  1                                            dog
5  1                                              5
                                          X3
1 very very long obnoxious character string here
2                                            dog
3                                            cat
4                                            dog
5                                              5
Run Code Online (Sandbox Code Playgroud)

printing r dataframe output-formatting

5
推荐指数
1
解决办法
996
查看次数

R中的结构方程模型是否有任何好书或教程?

有没有什么好的资源可以学习如何在R中构建结构方程模型?一位朋友请求帮助从SPSS的Amos转换为结构方程模型到R.他的R技能有限,而且我的SEM知识有限.是否有任何书籍/书籍章节/等沿着使用R!涵盖R的SEM封装的系列?

r

5
推荐指数
1
解决办法
3956
查看次数

你能指定read.table中的列数吗?

我正在尝试自动读取从另一个分析程序生成的文件.

标准输出通常为6列,以空格分隔,末尾带有回车符.通过在"read.table"中简单地使用"strip.white = TRUE",可以很好地读取.

我有一个问题,但是,如果参数被固定为常量,则b/c将注释添加到一行.
添加"flush = TRUE"允许我跳过这些偶尔的评论并阅读所有内容.

我想要做的是将这些注释(可能只在给定文件中出现一次)添加为第7列.

是否有读入方法允许我指定列数或其他方式使第7列符合要求?

可以在此处找到一小段数据

数据如下所示:

columns_1&2  column_3  column_4  column_6  column_6   column_7     
84:S 0:dorm  1.0000000 0.11E-005 0.9999979 1.0000021                           
85:p N:veg   1.0000000 0.0000000 1.0000000 1.0000000  Fixed               
86:p 0:dorm  0.260E-08 0.237E-05 -0.03E-05 0.46E-005
Run Code Online (Sandbox Code Playgroud)

r text-files read.table

5
推荐指数
1
解决办法
6749
查看次数

在 RMarkdown 中右对齐一行文本

我知道当 RMarkdown 使用模板生成 Word 文档时,可以更改文本对齐方式和其他设置。在此处输入链接描述

是否可以更改单行的对齐方式?

例如,文本看起来像

  Some normal left justified text

                                                           some right justified text

  Some more left justified text
Run Code Online (Sandbox Code Playgroud)

r knitr r-markdown

4
推荐指数
1
解决办法
3581
查看次数