常见字符串的字符串操作:合并与分割。
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)
效果如下: