_대문 | 방명록 | 최근글 | 홈피소개 | 주인놈 |
FrontPage › String처리
|
|
[edit]
1 str_replace #library(stringr) colnames(gender) <- str_replace(colnames(gender), "\.", " ") [edit]
2 format #
![]() > as.character(format(Sys.Date(), format="%Y%m%d")) [1] "20150408" [edit]
3 01,02,03.. 형태로 만들기 #library("stringr") > str_sub(paste0("00", 1:10), -2, -1) [1] "01" "02" "03" "04" "05" "06" "07" "08" "09" "10" [edit]
5 날짜 관련 #date to character
strftime(as.Date("2013-12-01")) yyyymmdd <- xpathSApply(doc,"//div[@class='filter-item' and @control-filter='daily']//a[@class='current']", xmlValue) generate_time <- xpathSApply(doc,"//div[@class='generate-time' and @data-meta='generate-time']//b", xmlValue) Sys.setlocale("LC_TIME","English") #"Jul 23, 2014 10:00am UTC+9" crawling_time <- strptime(paste(yyyymmdd, generate_time), "%b %d, %Y %I:%M%p", tz="") std_dt <- substr(crawling_time,1,10) Sys.setlocale("LC_TIME","Korean_Korea.949")
|
사람이 깊은 지혜를 갖고 있으면 있을수록 자기 생각을 나타내는 말은 더욱더 단순하게 되는 것이다. (톨스토이) |