dataset <- data.frame(Patient.ID=c("normal_01", "normal_02", "normal_03", "tumor_01", "tumor_02", "tumor_02"),
Sentrix.position=c("A01B01", "A01B02", "A016A01", "B02A02", "C01D02", "C02C01"), Treatment=c("Treated", "Treated", "Not treated", "Treated", "Treated", "Not treated"), value=c(3.25, 3.67, 4.26, 6.24, 5.78, 7.32), row.names = c("Sample1", "Sample2", "Sample3", "Sample4", "Sample5", "Sample6"))
dataset
## Patient.ID Sentrix.position Treatment value
## Sample1 normal_01 A01B01 Treated 3.25
## Sample2 normal_02 A01B02 Treated 3.67
## Sample3 normal_03 A016A01 Not treated 4.26
## Sample4 tumor_01 B02A02 Treated 6.24
## Sample5 tumor_02 C01D02 Treated 5.78
## Sample6 tumor_02 C02C01 Not treated 7.32