# 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