在R中,有没有办法在几行代码中替换特定的文本?

时间:2019-04-15 23:34:43

标签: r replace

我想运行相同的代码,但是每次都要更改数据框的名称,以便可以对我拥有的多个不同数据集运行相同的分析。是否有更有效的方法通过简单的replace函数来更改实例的代码,还是我每次都必须手动进行?

这是我的代码的样子:

    ```{r}
jd_df_wthr_corr <- subset(jd_df_wthr_lag, year < 2016) 
```

##Correlation of temperature (avg)

```{r}
jd_df_wthr_corr %>%
  ggplot(aes(logn, mean_temp)) +
  geom_point() +
  geom_smooth(method = "lm", se=FALSE)

cor.test(jd_df_wthr_corr$logn, jd_df_wthr_corr$mean_temp)
```


### with a 1 week lag

```{r}
jd_df_wthr_corr %>%
  ggplot(aes(lag_1week, mean_temp)) +
  geom_point() +
  geom_smooth(method = "lm", se=FALSE)

cor.test(jd_df_wthr_corr$lag_1week, jd_df_wthr_corr$mean_temp, use = "complete")
```

大约持续2500行。我想运行相同的代码,但将每个“ jd”实例替换为“ jz”,或者将每个“ jd_df_wthr_corr”替换为“ jz_df_wthr_corr”。我注意到,当我双击特定文本时,它会在代码中出现的所有位置突出显示相同的文本,这使我认为应该有一种方法可以在所有位置替换它。

1 个答案:

答案 0 :(得分:1)

results <- sapply(c(frame1, frame2), function(df) { return(run.analysis(df)) }, simplify=TRUE)

如果它不起作用,请发表评论,但我希望能有所帮助。