Q1:

用args（）和？（）了解strsplit（）函数

eyJsYW5ndWFnZSI6InIiLCJzYW1wbGUiOiIjIHlvdSBjYW4gZG8gaXQhIiwic29sdXRpb24iOiJhcmdzKHN0cnNwbGl0KVxuP2FyZ3Moc3Ryc3BsaXQpIn0=

Q2:

用args（）和？（）了解tolower（）函数
eyJsYW5ndWFnZSI6InIiLCJzYW1wbGUiOiIjIHlvdSBjYW4gZG8gaXQhIiwic29sdXRpb24iOiJhcmdzKHRvbG93ZXIpXG4/YXJncyh0b2xvd2VyKSJ9

Q3:

输入jason和chris两个男神导师和两位美女助教的最大特点，命名为personality 你可以直接复制：personality <- c(“JASON:RICH”,“CHRIS:INTELLIGENT”,“LILY:PASSINATE”,“ODELIA:HAPPY”) 用你刚了解的strsplit（）函数，把personality拆分成list的形式，并命名为personality2 最后用apply（）函数把刚才的list里面的每一个字母都变成小写的

eyJsYW5ndWFnZSI6InIiLCJzYW1wbGUiOiIjIFRoaXMgb25lIGlzIG5vdCB2ZXJ5IGVhc3ksIHRyeSB5b3VyIGJlc3Q6Iiwic29sdXRpb24iOiJwZXJzb25hbGl0eSA8LSBjKFwiSkFTT046UklDSFwiLFwiQ0hSSVM6SU5URUxMSUdFTlRcIixcIkxJTFk6UEFTU0lOQVRFXCIsXCJPREVMSUE6SEFQUFlcIilcbnBlcnNvbmFsaXR5Mjwtc3Ryc3BsaXQocGVyc29uYWxpdHksc3BsaXQ9JywnKVxuc2FwcGx5KHBlcnNvbmFsaXR5Mix0b2xvd2VyKVxubGFwcGx5KHBlcnNvbmFsaXR5Mix0b2xvd2VyKSJ9

Q4: 你在帮杂货店老王卖饮料，以下是本周7天每天卖的饮料的瓶数：

coke<-c(5,7,12,3,8,10,6)

beer<-c(9,15,6,7,3,18,25)

自创一个叫做absolute_deviate的函数，算出本周每天两种饮料的销售量差的绝对值，你可以用abs（）得到绝对值。记得设计完公式后拿coke和beer进行检验哦！

eyJsYW5ndWFnZSI6InIiLCJzYW1wbGUiOiIjIEp1c3QgZG8gaXQhXG5jb2tlPC1jKDUsNywxMiwzLDgsMTAsNilcbmJlZXI8LSIsInNvbHV0aW9uIjoiY29rZTwtYyg1LDcsMTIsMyw4LDEwLDYpXG5iZWVyPC1jKDksMTUsNiw3LDMsMTgsMjUpXG5cbmFic29sdXRlX2RldmlhdGlvbjwtZnVuY3Rpb24oeCx5KXtcbiAgYWJzKHgteSlcbn1cblxuYWJzb2x1dGVfZGV2aWF0aW9uKGNva2UsYmVlcikifQ==