R 语言对table进行sql查询

> install.packages("sqldf")
> library("sqldf")
> data = read.table("F:/d.csv",header=F, sep=",")
> head(data)
V1   V2 V3 V4 V5 V6 V7 V8 V9 V10 V11 V12
1 脏乱  adj  1  1 NN  7  2    NA  NA      NA
2 糟报  adj  1  1 NN  5  2    NA  NA      NA
3 早衰  adj  1  1 NE  5  2    NA  NA      NA
4 责备 verb  1  1 NN  5  2    NA  NA      NA
5 贼眼 noun  1  1 NN  5  2    NA  NA      NA
6 战祸 noun  1  1 ND  5  2 NC  5   2      NA
> attach(data)
The following objects are masked from data (pos = 9):

V1, V10, V11, V12, V2, V3, V4, V5, V6, V7, V8, V9

> sqldf("select * from data limit 6")
V1   V2 V3 V4 V5 V6 V7 V8 V9 V10 V11 V12
1 脏乱  adj  1  1 NN  7  2    NA  NA      NA
2 糟报  adj  1  1 NN  5  2    NA  NA      NA
3 早衰  adj  1  1 NE  5  2    NA  NA      NA
4 责备 verb  1  1 NN  5  2    NA  NA      NA
5 贼眼 noun  1  1 NN  5  2    NA  NA      NA
6 战祸 noun  1  1 ND  5  2 NC  5   2      NA
> sqldf("select * from data limit 10")
V1   V2 V3 V4 V5 V6 V7 V8 V9 V10 V11 V12
1    脏乱  adj  1  1 NN  7  2    NA  NA      NA
2    糟报  adj  1  1 NN  5  2    NA  NA      NA
3    早衰  adj  1  1 NE  5  2    NA  NA      NA
4    责备 verb  1  1 NN  5  2    NA  NA      NA
5    贼眼 noun  1  1 NN  5  2    NA  NA      NA
6    战祸 noun  1  1 ND  5  2 NC  5   2      NA
7    招灾  adj  1  1 NN  5  2    NA  NA      NA
8    折辱 noun  1  1 NE  5  2 NN  5   2      NA
9  中山狼 noun  1  1 NN  5  2    NA  NA      NA
10   清峻  adj  1  1 PH  5  0    NA  NA      NA
> sqldf("select * from data where V1 = '重点'")
V1   V2 V3 V4 V5 V6 V7 V8 V9 V10 V11 V12
1 重点 noun  1  1 NI  7  0    NA  NA      NA
>