R 菜鸟入门篇第09篇字符串

Mon, Mar 25, 2013 未分类 R

R 用单引号或双引号来表示字符串。其实前面我们已经接触过了：

pm <- "c:\\R\\data\\dapengde_DummyR_PM25.csv"
pm

## [1] "c:\\R\\data\\dapengde_DummyR_PM25.csv"

class(pm)

## [1] "character"

R 可以很灵活地把多个字符串合并。

paste("A", "B")

## [1] "A B"

paste("A", "B", sep = "_")

## [1] "A_B"

paste(c("A", "B"), 3)

## [1] "A 3" "B 3"

paste(c("A", "B"), 3:4)

## [1] "A 3" "B 4"

paste(c("A", "B"), 3:4, sep = "_")

## [1] "A_3" "B_4"

paste(c("A", "B"), 3:4, sep = "_", collapse = "-")

## [1] "A_3-B_4"


x <- 34
threshold <- 99
if (x < threshold) print(paste("x is less than", threshold))

## [1] "x is less than 99"


path <- "c:\\R\\data"
file <- "dapengde_DummyR_PM25.csv"
paste(path, file, sep = "\\")

## [1] "c:\\R\\data\\dapengde_DummyR_PM25.csv"


cat("可以换行", "\n", "也可以", "\t", "tab") #连接字符，可加入换行和tab。

## 可以换行 
##  也可以    tab

分割和截取：

nchar(x)

## [1] 2

strsplit("pzhao.org", "e")

## [[1]]
## [1] "dap"  "ngd"  ".com"

substr("pzhao.org", 1, 6)

## [1] "dapeng"

substring("pzhao.org", 1:10, 1:10)  # 这条指令换做substr试试有何不同。

##  [1] "d" "a" "p" "e" "n" "g" "d" "e" "." "c"

查找和替换：

grep("e", c("dapeng", "de", ".com"))

## [1] 1 2

gsub("d", "D", c("dapengde", "de", ".com"))

## [1] "DapengDe" "De"       ".com"

sub("d", "D", c("dapengde", "de", ".com"))

## [1] "Dapengde" "De"       ".com"

chartr("de", "cn", "pzhao.org")

## [1] "capnngcn.com"

大小写转换：

tolower("DAPENGDE")

## [1] "dapengde"

toupper("com")

## [1] "COM"

将数字转换成字符串。

as.character(2)

## [1] "2"

formatC(2, width = 2, flag = "0")

## [1] "02"

将上面这些命令组合起来，R 对字符串的操作无所不能。

有用的信息：

( 连载中，待续 )