常见字符串的字符串操作:合并与分割。
1. 合并字符串
paste函数用于合并字符串,其基本形式为 paste( <字符串>..., sep=" "),其中的参数如表2-13所示:
示例代码如下:
> data <- "4分50秒" > data <- paste("网站停留时间:","3小时",data,sep="") > data[1] "网站停留时间:3小时4分50秒"
2. 分割字符串
strsplit 函数可以依据特定字符串来把字符串分割为列表,其中用于分割的字符串将不再出现。下面,将把字符串“网站停留时间:3小时4分50秒”转化为用户停留时间的实数(以秒为单位)。
详细代码,保存在test.R中,如下:
data <- "4分50秒" data <- paste("网站停留时间:","3小时",data,sep="") data <- strsplit(strsplit(data,split=":")[[1]][2], split="小时"); data <- unlist(data); h <- as.numeric(data[1]); min.sec <- data[2]; min.sec <- unlist(strsplit(min.sec,split="分")) min <- as.numeric(min.sec[1]) sec <- min.sec[2]; sec <- unlist(strsplit(sec,split="秒")); sec <- as.numeric(sec[1]) times <- 3600*h+60*min+sec list <- "times=" print("times=") print(times)
原文地址:http://blog.csdn.net/sanqima/article/details/42498991