аюсь разобраться с текстом с помощью R, и вот мой вопрос.

Из этого исходного текста

#Pray4Manchester# I hope that #ArianaGrande# will be better soon.

Я хочу извлечьPray4Manchester а такжеArianaGrande используя шаблон#.+#, но когда я бегу

str_extract_all(text,pattern="#.+#")

я получил

#Pray4Manchester# I hope that #ArianaGrande#

Как это решить? Благодарю.