小编bla*_*zej的帖子

.xlsx当它们的原始小数点分隔符是逗号而不是点时，如何将数据从文件导入到 R 中，以便将数字表示为数字？

在处理 excel 时，我所知道的唯一包readxl来自tidyverse.

我正在寻找一种不需要在任何其他软件中打开和编辑 excel 文件的解决方案（并且可以处理要导入的数百列）-如果可能的话，我会将所有 excel 导出到.csv并使用工具导入它们我知道，这可以接受dec=争论。

到目前为止，我最好的工作解决方案是将数字作为字符导入，然后对其进行转换：

library(dplyr)
library(stringr)

var1<- c("2,1", "3,2", "4,5")
var2<- c("1,2", "3,33", "5,55")
var3<- c("3,44", "2,2", "8,88")
df<- data.frame(cbind(var1, var2, var3))

df %>%
      mutate_at(vars(contains("var")),
                str_replace,
                pattern = ",",
                replacement = "\\.") %>%
      mutate_at(vars(contains("var")), funs(as.numeric))

我正在尝试绘制除以年份的 ts 数据以进行比较。

问题是我不知道如何强制 ggplot 跳过每个图上缺少的日期。

我的数据结构如下所示：

> head(pmWaw)
                 date         stacja pm25 pm10       season  year month
1 2014-01-01 00:00:00 MzWarNiepodKom  100  122 winter (DJF) 2014       1
2 2014-01-01 00:00:00 MzWarszUrsynow   63   68 winter (DJF) 2014       1
3 2014-01-01 00:00:00 MzWarTarKondra   NA   79 winter (DJF) 2014       1
4 2014-01-01 01:00:00 MzWarNiepodKom   69   77 winter (DJF) 2014       1
5 2014-01-01 01:00:00 MzWarszUrsynow   36   38 winter (DJF) 2014       1
6 2014-01-01 01:00:00 MzWarTarKondra   NA   90 winter (DJF) 2014       1
> tail(pmWaw)
                     date       stacja …

是否有一种（最好是简单易懂的）方式来绘制带有R中中介系数的简单路径图？

我一直在寻找DiagrammeR打包的方法，但是这看起来像是一种矫kill过正（老实说，我未能弄清楚如何绘制剧情）。

我知道的其他选项是Dia或Inkscape，但这些选项需要手动定位，连接路径等。

mediation包中有一个plot选项，但它会绘制自举的CI，而我想要实现的是一条具有如下所示系数的简单路径：

使用脚本R处理Rmarkdown文档时，如何强制 RStudio (v1.1.383)始终在控制台（而不是内联）中评估块？

我知道我可以通过单击它在控制台中设置输出块：

根据这个 RStudio 支持帖子，我还可以取消选中“工具 - > 全局选项...”下的“显示所有 R Markdown 文档的内联输出”：

但是，有没有办法从命令行做到这一点？

我问的原因是，我经常在我的大学机器上工作，每次重置后它们都恢复为默认值。每次上课时，我们都必须手动浏览菜单。

知道如何通过控制台命令来做这件事就像开始我的每个课程一样有用 rm(list=ls())

我正在寻找一种方法来向我的数据表中添加一个列,该列由residuals一个lm(a~b)为不同级别单独计算的函数组成c

我被建议调查sort_by(c)功能,但似乎没有用lm(a~b)

我的工作示例数据如下所示:

列主题,试验和rt都在a之内data.frame,我的目标是计算Zre_SPSS(我最初在SPSS中制作)但是来自一个R函数.

我试过了

data %<>% group_by (subject) %>% 
  mutate(Zre=residuals(lm(log(rt)~trial)))

但它不起作用 - Zre得到计算但不是分别在每个主题内,而是整个数据框.

有人可以帮我吗？我是一个完整的R(和一般的编码)新手,所以请原谅我,如果这个问题是愚蠢的或重复的,我很可能不理解其他解决方案或他们找不到解决方案.最好的祝福.

根据Ben Bolker的要求,这里是R代码,用于从excel屏幕截图生成数据

#generate data
  subject<-c(1,1,1,1,1,1,2,2,2,2,2,2,3,3,3,3,3,3)
  subject<-factor(subject)
  trial<-c(1,2,3,4,5,6,1,2,3,4,5,6,1,2,3,4,5,6)
  rt<-c(300,305,290,315,320,320,350,355,330,365,370,370,560,565,570,575,560,570)

#Following variable is what I would get after using SPSS code
  ZreSPSS<-c(0.4207,0.44871,-1.7779,0.47787,0.47958,-0.04897,0.45954,0.45487,-1.7962,0.43034,0.41075,0.0407,-0.6037,0.0113,0.61928,1.22038,-1.32533,0.07806)

#make data frame
  sym<-data.frame(subject, trial, rt, ZreSPSS)

我认为这已被多次询问，但我找不到合适的词来找到可行的解决方案。

如何spread()基于多个值的多个键的数据框？

一个简化的（我有更多的列要传播，但只有两个键：Id和time给定测量的点）我正在处理的数据如下所示：

df <- data.frame(id = rep(seq(1:10),3), 
                 time = rep(1:3, each=10), 
                 x = rnorm(n=30), 
                 y = rnorm(n=30))

> head(df)
  id time           x           y
1  1    1 -2.62671241  0.01669755
2  2    1 -1.69862885  0.24992634
3  3    1  1.01820778 -1.04754037
4  4    1  0.97561596  0.35216040
5  5    1  0.60367158 -0.78066767
6  6    1 -0.03761868  1.08173157
> tail(df)
   id time           x          y
25  5    3  0.03621258 -1.1134368
26  6    3 -0.25900538  1.6009824
27  7    3  0.13996626 …

是否有一种易于使用的方法来设置自定义默认kable()选项,因此无需为每次kable()调用重写它们.

例如,我通常的表样式使用以下代码:

library(kableExtra)
kable(mtcars, booktabs=TRUE, digits= 2) %>% kable_styling(latex_options =c("striped", "scale_down"))

我想设置所有kable() kable_styling选项,以便kable(mtcars)没有参数的调用默认为我通常的表样式.