我试图将数据框的列中的字符串与另一个数据框的列中的字符串进行匹配,并映射相应的值.两个数据帧的行数不同

df1 = data.frame(name = c("(CKMB)Creatinine Kinase Muscle & Brain", "24 Hours Urine for Sodium", "Antistreptolysin O Titer", "Blood group O", lonic_code = c("27816-8-O", "27816-8-B", "1869-7", "33914-3")
df2 = data.frame(Testcomponents = c("creatinine", "blood", "potassium"))

预期产出

Test Components          lonic_code
creatinine                27816-8-O
 blood                      1869-7
potassium                    NA

我如何为给定的时间戳标记一天中的时间（早上、下午和晚上）？

初始数据

Id            Time_stamp
3083188c     2016-08-29 13:10:51
924d500e     2016-08-29 09:22:33
ad4dd7ff     2016-08-25 20:29:35

最终数据

 Id            Time_stamp              Time_of_day
3083188c     2016-08-29 13:10:51        Afternoon
924d500e     2016-08-29 09:22:33        Morning
ad4dd7ff     2016-08-25 20:29:35        Evening