```r
sentiment_messages %>%
  arrange(sentiment)
```

```
## # A tibble: 3,554 x 4
##    newsgroup             id     sentiment words
##    <chr>                 <chr>      <dbl> <int>
##  1 rec.sport.hockey      53907      -3        6
##  2 sci.electronics       53899      -3        5
##  3 talk.politics.mideast 75918      -3        7
##  4 rec.autos             101627     -2.83     6
##  5 comp.graphics         37948      -2.8      5
##  6 comp.windows.x        67204      -2.7     10
##  7 talk.politics.guns    53362      -2.67     6
##  8 alt.atheism           51309      -2.6      5
##  9 comp.sys.mac.hardware 51513      -2.6      5
## 10 rec.autos             102883     -2.6      5
## # … with 3,544 more rows
```

```r
print_message("rec.sport.hockey", 53907)
```

```
## Losers like us? You are the fucking moron who has never heard of the Western
## Business School, or the University of Western Ontario for that matter. Why 
## don't you pull your head out of your asshole and smell something other than
## shit for once so you can look on a map to see where UWO is! Back to hockey,
## the North Stars should be moved because for the past few years they have
## just been SHIT. A real team like Toronto would never be moved!!!
## Andrew--
```