全部版块 我的主页
论坛 数据科学与人工智能 数据分析与数据科学 R语言论坛
1057 3
2020-03-28
library(readxl)
> data<-read_excel("C:\\Users\\dell\\Desktop\\数据\\双十一数据整理后(1).xlsx")
> data
# A tibble: 300 x 33
      id    y1    y2    y3    y4    y5  lnyy    x1    x2    x3    x4    x5    x6    x7
   <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl>
1     1     0     0     0     0     1  9.21     0     0     2     3     1     0     0
2     2     1     0     0     0     0  6.21     0     0     1     1     0     0     0
3     3     0     1     0     0     0  7.13     0     1     2     2     0     0     0
4     4     0     1     0     0     0  7.13     0     0     2     1     1     0     0
5     5     1     0     0     0     0  6.21     0     0     1     1     1     0     0
6     6     1     0     0     0     0  6.21     0     1     1     1     0     0     0
7     7     0     1     0     0     0  7.13     0     1     1     1     1     0     0
8     9     0     0     1     0     0  8.16     0     1     3     2     1     0     0
9    10     0     1     0     0     0  7.13     0     1     2     1     1     0     0
10    11     0     0     1     0     0  8.16     1     1     2     2     1     0     1
# ... with 290 more rows, and 19 more variables: x8 <dbl>, x9 <dbl>, x10 <dbl>, x11 <dbl>,
#   x12 <dbl>, x13 <dbl>, x14 <dbl>, lnincome <dbl>, xx1 <chr>, y <chr>, xx2 <dbl>,
#   xx3 <dbl>, xx4 <chr>, xx5 <chr>, xx6 <chr>, xx7 <chr>, xx8 <chr>, yy <dbl>,
#   income <dbl>
> as.matrix(data)
       id    y1  y2  y3  y4  y5  lnyy       x1  x2  x3  x4  x5  x6  x7  x8  x9  x10 x11
  [1,] "  1" "0" "0" "0" "0" "1" "9.210340" "0" "0" "2" "3" "1" "0" "0" "1" "0" "0" "0"
  [2,] "  2" "1" "0" "0" "0" "0" "6.214608" "0" "0" "1" "1" "0" "0" "0" "0" "0" "1" "0"
  [3,] "  3" "0" "1" "0" "0" "0" "7.130899" "0" "1" "2" "2" "0" "0" "0" "0" "0" "0" "0"
  [4,] "  4" "0" "1" "0" "0" "0" "7.130899" "0" "0" "2" "1" "1" "0" "0" "0" "0" "0" "0"
  [5,] "  5" "1" "0" "0" "0" "0" "6.214608" "0" "0" "1" "1" "1" "0" "0" "0" "0" "0" "0"
  [6,] "  6" "1" "0" "0" "0" "0" "6.214608" "0" "1" "1" "1" "0" "0" "0" "1" "0" "0" "0"
  [7,] "  7" "0" "1" "0" "0" "0" "7.130899" "0" "1" "1" "1" "1" "0" "0" "0" "0" "0" "0"
  [8,] "  9" "0" "0" "1" "0" "0" "8.160519" "0" "1" "3" "2" "1" "0" "0" "0" "0" "0" "0"
  [9,] " 10" "0" "1" "0" "0" "0" "7.130899" "0" "1" "2" "1" "1" "0" "0" "1" "0" "0" "1"
table(x1)
Error in table(x1) : 找不到对象'x1'
> table(id)
Error in table(id) : 找不到对象'id'
> table(y1)
Error in table(y1) : 找不到对象'y1'

二维码

扫码加我 拉你入群

请注明:姓名-公司-职位

以便审核进群资格,未注明则拒绝

全部回复
2020-3-28 21:13:53
table(data$x1)
二维码

扫码加我 拉你入群

请注明:姓名-公司-职位

以便审核进群资格,未注明则拒绝

2020-3-29 09:29:57
好的,谢谢您
二维码

扫码加我 拉你入群

请注明:姓名-公司-职位

以便审核进群资格,未注明则拒绝

2020-4-6 08:28:34
孙玉文 发表于 2020-3-28 21:07
library(readxl)
&gt; data data
# A tibble: 300 x 33

二维码

扫码加我 拉你入群

请注明:姓名-公司-职位

以便审核进群资格,未注明则拒绝

相关推荐
栏目导航
热门文章
推荐文章

说点什么

分享

扫码加好友,拉您进群
各岗位、行业、专业交流群