Please check this out if it helps you
df<-read.csv("F:/test.csv",header=FALSE,nrows=1) df V1 V2 V3 V4 V5 1 ID GRADES GPA Teacher State a<-c(df) a[1] $V1 [1] ID Levels: ID
a[2] $V2 [1] GRADES Levels: GRADES
a[3] $V3 [1] GPA Levels: GPA
a[4] $V4 [1] Teacher Levels: Teacher
a[5] $V5 [1] State Levels: State