Либо Виртуальная машина с разработанной на Linux средой разработки, либо локальная копия некоторой независимой от набора инструментов IDE (например, Notepad ++, с тестированием, выполненным с помощью MinGW или CygWin, насколько это возможно), или просто пишите в Notepad ++ и сохраняйте загружаю на свой компьютер и тестирую там, что я и делаю.
Насколько я понимаю, вам нужно извлечь идентификатор из имени файла, а затем объединить импортированный CSV-файл с существующим фреймом данных.
df1 <- read.csv(textConnection("ID, var1, var2
A, 2, 2
B, 4, 5"))
# assuming the imported csv-files are in working directory
filenames <- list.files(getwd(), pattern = "ID_[A-Z].csv")
# extract ID from filename
ids <- gsub("ID_([A-Z]).csv", "\\1", filenames)
# import csv-files and append ID
library(plyr)
import <- mdply(filenames, read.csv)
import$ID <- ids[import$Var1]
import$Var1 <- NULL
# merge imported csv-files and the existing dataframe
merge(df1, import)
Результат:
ID var1 var2 time var4 var5
1 B 4 5 0 1 2
2 B 4 5 1 4 5
3 B 4 5 2 1 6