R中如何对某一变量取独特值？

本人在运行R程序遇到一点小困惑，先来比较两段简单的程序：

a. 直接联网运行
classroom <- read.csv("http://www-personal.umich.edu/~bwest/classroom.csv")
schoolLookupVec <- unique(classroom[c("classid","schoolid")])[,"schoolid"]

Result:


b. 将文件下载后运行
（将上述文件下载后运行：http://www-personal.umich.edu/~bwest/classroom.csv）
classroom <- read_csv("C:/Users/data/Desktop/classroom (1).csv")
schoolLookupVec <- unique(classroom[c("classid","schoolid")])[,"schoolid"]

Result:


1. 为什么同样的数据（区别仅在于联网与非联网）同样的程序却产生了不同的结果： a中结果生成的是Values，而b中结果是data？
2. 如何使本地文件生成的结果是Values？

期待各位朋友指点和意见！谢谢

2个方法都得到 vector .用df[,'var1']这种方法 对dataframe 选一个变量的时候就会得到vector. 选2个或以上就会变成dataframe。
建议用
library(dplyr)
classroom <- read.csv("http://www-personal.umich.edu/~bwest/classroom.csv")
schoolLookupVec <- unique(classroom[c("classid","schoolid")])%>%select("schoolid")

###############################################################
classroom <- read.csv("http://www-personal.umich.edu/~bwest/classroom.csv")
glimpse(classroom)  
schoolLookupVec <- unique(classroom2[c("classid","schoolid")])[,"schoolid"]
glimpse(schoolLookupVec)


classroom2 <- read.csv("classroom.csv")
glimpse(classroom2)  
schoolLookupVec2 <- unique(classroom2[c("classid","schoolid")])[,"schoolid"]
glimpse(schoolLookupVec2)

rainningpoet 发表于 2018-5-7 23:37
2个方法都得到 vector .用df[,'var1']这种方法 对dataframe 选一个变量的时候就会得到vector. 选2个或以上就 ...

classroom2 <- read.csv("classroom.csv")
glimpse(classroom2)  
schoolLookupVec2 <- unique(classroom2[c("classid","schoolid")])[,"schoolid"]
glimpse(schoolLookupVec2)

我把csv换成excel后，用以上code还是得出的是dataframe，请问这是为什么？
谢谢！