** 上图显示了示例数据列表,所以我只想记录内容特定的关键字结尾,如(联系人);在那一行。**
data <- read.csv("csv.csv", sep = ',')
# Get the max salary from data frame.
Piname <- data$col_NAME
print(Piname)
poname <- Piname[str_detect(Piname,"(end_string);")]
print(poname)
#summary(warnings())
tail(warnings(), 50)