В R есть ли способ заменить определенный текст в нескольких строках кода?

#r #replace

#r #заменить

Вопрос:

Я хотел бы запускать один и тот же код, но каждый раз менять имя фрейма данных, чтобы я мог выполнять один и тот же анализ для нескольких разных наборов данных, которые у меня есть. Есть ли более эффективный способ изменить мой код для экземпляра с помощью простой функции замены или мне придется каждый раз делать это вручную?

Вот как выглядит мой код:

     ```{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:

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

Если это не сработает, оставьте комментарий, но я надеюсь, что это поможет.