R语言解析披头士的出生日期小练习

出生日期小练习"/>

R语言解析披头士的出生日期小练习

R语言解析披头士的出生日期小练习

练习11-1

解析披头士的出生日期，并使用“AbbreviatedWeekday DAYOFMONTH Abbreviated-MonthNameTwoDigitYear”的形式（例如，Wed 09 Oct 40）把它们打印出来，他们的出生日期列于下表：

首先将披头士成员的生日以数据框的形式展现出来

data_frame <- data.frame(Band_members = c("Ringo Starr","John Lennon","Paul McCartney","George Harrison"),Band_member_birthday = c("1940-07-07","1940-10-09","1942-06-18","1943-02-25"))
data_frame

这里我使用的是for循环
在数据框中的数据都是character的格式，需要转换成Date的形式
data_frame[[2]][i]是数据框的索引，代表的是该数据框第2列的第i个数据

for(i in c(1:4)){if(i <= 4){birthday <- as.Date(data_frame[[2]][i])new_birthday <- strftime(birthday,"%a %d %b %y")new_birthday <- as.character(new_birthday)data_frame[[2]][i] <- new_birthday} 
}
print(data_frame)