редактирование начала предложения ‹s› и конца ‹/s› с помощью R для предсказания

Я создаю модель НЛП, чтобы предсказать следующее слово в R. Итак, для корпуса из 3 предложений:

a<-"i like cheese"

b<-"the dog like cat"

c<-"the cat eat cheese"

Я хочу, чтобы это стало:

>a
 "<.s> i like cheese <./s>"

>b
 "<.s> the dog like cat <./s>"

>c
 "<.s> the cat eat cheese <./s>"

Есть ли более простой способ сделать это, чем:

a<-Unlist(strsplit(a, " "))
a[1]<-"<.s>"
a[length(a)]<-"./s>"
a<-paste(a, collapse = " ")
> a 
 "<.s> i like cheese <./s>"