Praticando BoW

Dado os seguintes textos:

• t1 <- c("Today will be an awesome day. The best day of the week")
• t2 <- c("Yesterday was an awesome day. Better than today.")
• t3 <- c("Tomorrow will be the best day. Better than yesterday and today.")

Você criou um vetor de palavras:

word_vector <- c("today", "awesome", "day", "best", "week", "yesterday", "better", "tomorrow").

Qual é uma possível representação de saco de palavras (bag-of-words) de t3?