# gender gree word # 1 M 1 best # 1.1 M 1 professor # 1.2 M 1 i've # 1.3 M 1 had # 1.4 M 1 in # 1.5 M 1 collegeĪfter that, we have a total of 1668696 individual words from the 38157 comments on the 1,000 professors. # 1.5 respected accessible outside class skip class? you won't pass. # 1.4 respected accessible outside class skip class? you won't pass. # 1.3 respected accessible outside class skip class? you won't pass. # 1.2 respected accessible outside class skip class? you won't pass. # 1.1 respected accessible outside class skip class? you won't pass. Prof.tm <- unnest_tokens(prof1000, word, comments) dim(prof.tm) # 1668696 14 head(prof.tm) # id profid rating difficulty credit grade book take attendance # 1 1 1 5 3 1 5 0 1 1 # 1.1 1 1 5 3 1 5 0 1 1 # 1.2 1 1 5 3 1 5 0 1 1 # 1.3 1 1 5 3 1 5 0 1 1 # 1.4 1 1 5 3 1 5 0 1 1 # 1.5 1 1 5 3 1 5 0 1 1 # tags date # 1 respected accessible outside class skip class? you won't pass. We then divide the comments on the professors into individual words using the function unnest_tokens from the R package tidytext. he does give a lot of homework but he will work with you if you don't clear understan"| _truncated_ "Professor is an incredible respected teacher, however his class is extreme difficult. He assign a heavy amount of homework bu"| _truncated_ "He was a great professor. only thing i dont like is the writing assignment" "Professor has been the best mathematics professor I've had at thus far. # $ comments : chr "best professor I've had in college. # $ tags : chr "respected accessible outside class skip class? you won't pass." "accessible outside class lots of homework respected" "tough grader lots of homework accessible outside class" "tough grader so many papers lots of homework".
0 Comments
Leave a Reply. |
AuthorWrite something about yourself. No need to be fancy, just an overview. ArchivesCategories |