熟悉MySQL的朋友可以使用sqldf来操作数据框
# 引入sqldf库(sqldf) library(sqldf) # 释放RMySQL库的加载(针对sqldf报错) #detach("package:RMySQL", unload=T) # 读取数据 data <- read.csv("data.csv") # sql查询 results <- sqldf("select distinct(name) from data") # 获取故障代码列表,R中for循环不能处理List，需要转换成向量或者array name_list <- as.vector(unlist(results))