[R] Ask for help - how to change WHIRR.117.csv to WHIRR_117.csv

Hi, I have a script below. dat - read.table(file=pt.csv, header=T, sep=,, row.names=1, col.names=1) dat for(which_col in seq_len(ncol(dat))) { subset_data - dat[,which_col:ncol(dat)] file_name - sprintf('%s.csv', colnames(dat)[which_col]) write.csv(subset_data, file_name)

Re: [R] Ask for help - how to change WHIRR.117.csv to WHIRR_117.csv

Hello, Maybe the code below answers to both your questions (Q1 and Q2) cnames - colnames(dat) cnames - sub(WHIRR\\., WHIRR_, cnames) for(which_col in seq_len(ncol(dat))) { subset_data - dat[which_col:ncol(dat)] # change 1, Q2 file_name - sprintf('%s.csv', cnames[which_col]) #