# modify for where you are working on this setwd("") # if needed, put options into the read.csv call filename <- "GSE69618_data.csv" data <- read.csv(filename) # complete to say how many samples there are in the file print(paste("Number of samples in", filename, "")) # complete to say how many probes/rows in the file print(paste("Number of probes in", filename, "")) # boxplot of columns that are columns with expression data # if necessary, modify data by applying log2