R语言中输出函数 print和cat

 

001、print函数

a、简单输出

> print(100)          ## 输出数值
[1] 100
> print("abcd")       ## 输出字符串
[1] "abcd"

 

b、输出变量

> a <- 100
> b <- "xyz"
> print(a)         ## 输出数值变量
[1] 100
> print(b)         ## 输出字符串变量
[1] "xyz"

 

002、cat函数

a、

> cat(100)          ## 输出数值
100
> cat("abcd")       ## 输出字符串
abcd

 

b、

> a <- 100
> b <- "xyz"
> cat(a)        ## cat输出数值变量
100
> cat(b)        ## cat输出字符串变量
xyz

 

c、cat合并

a <- 100                      ## 数值变量
b <- 200
cat("xxxx", a, b)             ## 合并01
cat("xxxx", a, b, 10000)      ## 合并02

 

d、cat将内容写入文件

I、清空写入

> dir()                                ## 当前路径无文件
character(0)
> a <- 100                             ## var1
> b <- "xyz"                           ## var2
> cat(a, b, file = "a.txt")            ## cat写入文件，使用file选项
> dir()                                ## 当前路径多出a.txt文件
[1] "a.txt"

 

note：windows打开查看a.txt

 

II、追加写入

x <- "qqqqq"
y <- "ttttt"
cat(x, y, "\n", file = "a.txt", append = T)        ## 追加写入，实际上是增加了apped选项 = T；
dir()

 

note：windows查看a.txt文件内容 （没有换行，可能是a.txt原始文件中没有换行符）

 

III、再次追加写入换行符观察效果

m <- "kkkk"
n <- "wwww"
cat(m, n, "\n", file = "a.txt", append = T)        ## 增加换行符"\n", 追加写入
dir()

 

note：windows查看本次效果， 正常换行，说明上次未换行是因为第一次写入的时候没有附带换行符

 。