# \donttest{
# Note that dimensions are called Dim1_harmonytexts etc.
word_embeddings_4$texts$harmonytexts
# Change to just Dim
w_e_T <- textDimName(word_embeddings_4$texts["harmonytexts"],
dim_names = FALSE
)
# Change back to include the original name
w_e_F <- textDimName(w_e_T, dim_names = TRUE)
# Change and add a custom name
w_e_custom <- textDimName(w_e_T, dim_names = TRUE, name = "CustomName")
# }
Run the code above in your browser using DataLab