Sweary is an R package that contains a database of swear words from different languages, cherry picked by native speakers.
The development version of this package can be installed using devtools:
devtools::install_github("pdrhlik/sweary")
Language | Language code | Number of swear words |
---|---|---|
Czech | cs | 57 |
German | de | 99 |
English | en | 39 |
French (Canada) | fr-CA | 20 |
Greek | gr | 13 |
Macedonian | mk | 64 |
Polish | pl | 41 |
Romanian | ro | 38 |
Slovak | sk | 28 |
Total | 9 langs | 399 |
All languages are stored in a swear_words
data frame.
library(sweary)
head(swear_words)
## # A tibble: 6 x 2
## word language
## <chr> <chr>
## 1 buzerant cs
## 2 čubka cs
## 3 čurák cs
## 4 čůrák cs
## 5 debil cs
## 6 dement cs
You can only extract one language that you are interested in.
en_swear_words <- get_swearwords("en")
head(en_swear_words)
## # A tibble: 6 x 2
## word language
## <chr> <chr>
## 1 arse en
## 2 arsehole en
## 3 ass en
## 4 asshole en
## 5 bitch en
## 6 bollocks en
If you are not comfortable with git
and pull requests, you can just
follow steps 1-3. After you create the file, send it to me via
email with a subject New sweary
language: {LANG_CODE}. We will acknowledge you in the README after we
approve of the changes.
data-raw/swear-word-lists/{LANG_CODE}_{LANG_NAME}
.data-raw/swear-word-lists/en_English
data-raw/swear-word-lists/fr-CA_French (Canada)
build_sweary()
. It becomes available when you git clone
the
repository and call devtools::load_all()
. Or pressing
Ctrl+Shift+L
in RStudio. Learn more about calling this function
using ?build_sweary
.The idea first appeared after the South Park text analysis lightning talk at the Why R? 2018 conference in Wrocław. All the contributors will be acknowledged as the work progresses.
Here we would like to say BIG THANKS to native speakers that help us with swear words dictionaries: