R语言与商业智能

1 使用window的粘贴功能

先复制excle中的数据

</pre>x<-read.table("clipboard")#从粘贴板读取数据
write.table(x=x,file="clipboard",sep='|t')  #把数据写到粘贴板，粘贴到excle中就可以了
2 保存输出
 > sink（"myresult.txt")  #吧以下结果存在myresult.txt中
  > x<- 1:10
> x
 [1]  1  2  3  4  5  6  7  8  9 10
> sink()
head()和tail（）的使用，对于只想了解大数据集，非常有用
tail(iris,n=3)#查看后三行
# 需要重复创建因子类型的时候，可以使用rep函数，然后转化为因子型，或者直接使用gl函数完成
#创建一个3水平的每个水平重复两次的因子序列
> gl(n=3,k=2,labels=c("R","Python","Lisp"))
[1] R      R      Python Python Lisp   Lisp  
Levels: R Python Lisp
再来看看cbind,和rbind，都是合并数据集的，
cbind(.....,deparse.level=1) 
deparse.level取值可以是1，2，3，0表示没有标签，1表示如果有标签，就使用标签，2表示没有标签，强制使用参数名字作为标签
> a<- 10
> a
[1] 10
> rbind(1:4,c=2,"aa"=10,a,deparse.level = 0)#中间两行有标签
   [,1] [,2] [,3] [,4]
      1    2    3    4
c     2    2    2    2
aa   10   10   10   10
     10   10   10   10
> rbind(1:4,c=2,"aa"=10,a,deparse.level = 1)# 后三行有标签
   [,1] [,2] [,3] [,4]
      1    2    3    4
c     2    2    2    2
aa   10   10   10   10
a    10   10   10   10
> rbind(1:4,c=2,"aa"=10,a,deparse.level = 2)
    [,1] [,2] [,3] [,4]
1:4    1    2    3    4
c      2    2    2    2
aa    10   10   10   10
a     10   10   10   10
> cbind(1:4,c=2,"aa"=10,a,deparse.level = 2)#列合并
     1:4 c aa  a
[1,]   1 2 10 10
[2,]   2 2 10 10
[3,]   3 2 10 10
[4,]   4 2 10 10
下面的摘自豆瓣：
1)向量是用来存储一堆数据的，其中的数据必须具有相同的数据类型，比如都是整数或者都是字符。可以使用C（）来创建向量。
  
  
例：
  
  
<代码开始 >
  
  
> c.number<-c(1,2,3,4,6)
  
  
> v.char<-c("Jane","Justin","Tom")
  
  
> v.bool<-c(TRUE,FALSE,FALSE)
  
  
</代码结束>
  
  
2)在R中除了0、NULL和NA之外的其他值都是真。
  
  
例：
  
  
<代码开始 >
  
  
> if(-1)print("true")
  
  
[1] "true"
  
  
> if(0)print("false")
  
  
> if(NA)print("false")
  
  
Error in if (NA) print("false") : 需要TRUE/FALSE值的地方不可以用缺少值
  
  
> if(NULL)print("false")
  
  
Error in if (NULL) print("false") : 参数长度为零
  
  
</代码结束>
  
  
3)在R中，如果一个向量中有两种不同的数据类型，那么R就会按照低级向自动转化，数据类型的高低顺“NULL<raw<logical<integer<double<complex<character<list<expression”
  
  
下面这个例子，由于字符的级别更高，就造成了把数字类型转换成字符的情况！
  
  
> x<-c(1:10,"Jane")
  
  
> x
  
  
 [1] "1"    "2"    "3"    "4"    "5"    "6"    "7"    "8"    "9"    "10"  
  
  
[11] "Jane"
  
  
> x<-c(1:10,"Jane")
  
  
> class(x)
  
  
[1] "character"
  
  
> y<-c(1:10)
  
  
> class(y)
  
  
[1] "integer"
  
  
4)在R中，x[-1]表示的意思：是除第1个元素之外的其他元素。R中向量的坐标是从1开始的，不是0.
  
  
   例：
  
  
> x<-c(1:10)
  
  
> x[0]
  
  
integer(0)
  
  
> x[1]
  
  
[1] 1
  
  
> x[2:4]
  
  
[1] 2 3 4
  
  
> x[-1]#取出除了第1个以外的元素
  
  
[1]  2  3  4  5  6  7  8  9 10
  
  
> x[11]#返回NA值，注意和x[0]的不同
  
  
[1] NA
  
  
5)在给变量命名的时候，需要符合一定的规则，必须是以字母或者“.”开头，并且以“.”开头的名字后第一个字符只能是“_”或者字母。
  
  
例：
  
  
   x<-1   #合法的
  
  
   x.1<-1  #合法的
  
  
   “1”<-1  #合法的，因为这是字符“1”，但是取出值的时候要用get函数，不要使用这种命名
  
  
   .x<-1   #合法的，以点开头的
  
  
   .1      #不合法，“.”后不能加数字
  
  
   ._<-1    #合法，但是不推荐使用，因为这样做没有任何好处