Cherokee VOT Across Years
library(ggplot2)
charokeeVOT <- read.delim("C:/Users/melan/Downloads/cherokeeVOT.txt")
View(charokeeVOT)
ggplot(charokeeVOT) +
geom_col(aes(x= year, y= VOT))

This script loads a dataset containing VOT measurements for Cherokee
speech and visualizes the data using R. After importing the dataset, a
bar plot is generated with year on the x-axis and VOT on the y-axis.
Each bar represents the VOT value associated with a given year, allowing
for a visual comparison of VOT measurements across time.
Letter Frequency in Wordle Answer Words
library(tidyverse)
words <- read.csv("C:/Users/melan/Downloads/FreqWords.csv")
letters_df <- words %>%
mutate(
letter1 = str_sub(FreqWords, 1, 1),
letter2 = str_sub(FreqWords, 2, 2),
letter3 = str_sub(FreqWords, 3, 3),
letter4 = str_sub(FreqWords, 4, 4),
letter5 = str_sub(FreqWords, 5, 5)
)
long <- letters_df %>%
pivot_longer(cols = starts_with("letter"),
names_to = "position",
values_to = "character")
is.vector(str_split(words, ""))
[1] TRUE
ggplot(long, aes(x = character)) +
geom_bar()

labs(
title = "Letter Frequency in Wordle Answers",
x = "Letter",
y = "Frequency"
) +
theme_minimal()
NULL
This analysis investigates which letters occur most frequently in
Wordle answer words. The dataset consists of a list of five-letter
English words, with each word treated as a single observation. Using R,
each word is split into its individual letters, and the data are
reshaped so that each letter appears as its own row. The frequency of
each letter is then calculated by counting how often it occurs across
the entire Wordle answer list. These frequencies are visualized in a bar
chart, making it easy to compare how commonly different letters appear
in Wordle answers.
LS0tDQp0aXRsZTogIlIgTm90ZWJvb2siDQphdXRob3I6ICJNZWxhbmllIE5hcGEiDQpkYXRlOiAiMTIvMTUvMjAyNSINCm91dHB1dDoNCiAgaHRtbF9ub3RlYm9vazogZGVmYXVsdA0KICBwZGZfZG9jdW1lbnQ6IGRlZmF1bHQNCiAgaHRtbF9kb2N1bWVudDoNCiAgICBkZl9wcmludDogcGFnZWQNCi0tLQ0KIyMgQ2hlcm9rZWUgVk9UIEFjcm9zcyBZZWFycyANCmBgYHtyfQ0KbGlicmFyeShnZ3Bsb3QyKQ0KY2hhcm9rZWVWT1QgPC0gcmVhZC5kZWxpbSgiQzovVXNlcnMvbWVsYW4vRG93bmxvYWRzL2NoZXJva2VlVk9ULnR4dCIpDQpWaWV3KGNoYXJva2VlVk9UKQ0KZ2dwbG90KGNoYXJva2VlVk9UKSArDQogIGdlb21fY29sKGFlcyh4PSB5ZWFyLCB5PSBWT1QpKQ0KYGBgDQoNClRoaXMgc2NyaXB0IGxvYWRzIGEgZGF0YXNldCBjb250YWluaW5nIFZPVCBtZWFzdXJlbWVudHMgZm9yIENoZXJva2VlIHNwZWVjaCBhbmQgdmlzdWFsaXplcyB0aGUgZGF0YSB1c2luZyBSLiBBZnRlciBpbXBvcnRpbmcgdGhlIGRhdGFzZXQsIGEgYmFyIHBsb3QgaXMgZ2VuZXJhdGVkIHdpdGggeWVhciBvbiB0aGUgeC1heGlzIGFuZCBWT1Qgb24gdGhlIHktYXhpcy4gRWFjaCBiYXIgcmVwcmVzZW50cyB0aGUgVk9UIHZhbHVlIGFzc29jaWF0ZWQgd2l0aCBhIGdpdmVuIHllYXIsIGFsbG93aW5nIGZvciBhIHZpc3VhbCBjb21wYXJpc29uIG9mIFZPVCBtZWFzdXJlbWVudHMgYWNyb3NzIHRpbWUuDQoNCg0KIyMgTGV0dGVyIEZyZXF1ZW5jeSBpbiBXb3JkbGUgQW5zd2VyIFdvcmRzDQpgYGB7cn0NCmxpYnJhcnkodGlkeXZlcnNlKQ0Kd29yZHMgPC0gcmVhZC5jc3YoIkM6L1VzZXJzL21lbGFuL0Rvd25sb2Fkcy9GcmVxV29yZHMuY3N2IikNCg0KbGV0dGVyc19kZiA8LSB3b3JkcyAlPiUNCiAgbXV0YXRlKA0KICAgIGxldHRlcjEgPSBzdHJfc3ViKEZyZXFXb3JkcywgMSwgMSksDQogICAgbGV0dGVyMiA9IHN0cl9zdWIoRnJlcVdvcmRzLCAyLCAyKSwNCiAgICBsZXR0ZXIzID0gc3RyX3N1YihGcmVxV29yZHMsIDMsIDMpLA0KICAgIGxldHRlcjQgPSBzdHJfc3ViKEZyZXFXb3JkcywgNCwgNCksDQogICAgbGV0dGVyNSA9IHN0cl9zdWIoRnJlcVdvcmRzLCA1LCA1KQ0KICApDQpsb25nIDwtIGxldHRlcnNfZGYgJT4lDQogIHBpdm90X2xvbmdlcihjb2xzID0gc3RhcnRzX3dpdGgoImxldHRlciIpLA0KICAgICAgICAgICAgICAgbmFtZXNfdG8gPSAicG9zaXRpb24iLA0KICAgICAgICAgICAgICAgdmFsdWVzX3RvID0gImNoYXJhY3RlciIpDQoNCmlzLnZlY3RvcihzdHJfc3BsaXQod29yZHMsICIiKSkNCg0KZ2dwbG90KGxvbmcsIGFlcyh4ID0gY2hhcmFjdGVyKSkgKw0KICBnZW9tX2JhcigpDQogIGxhYnMoDQogICAgdGl0bGUgPSAiTGV0dGVyIEZyZXF1ZW5jeSBpbiBXb3JkbGUgQW5zd2VycyIsDQogICAgeCA9ICJMZXR0ZXIiLA0KICAgIHkgPSAiRnJlcXVlbmN5Ig0KICApICsNCiAgdGhlbWVfbWluaW1hbCgpDQoNCmBgYA0KDQpUaGlzIGFuYWx5c2lzIGludmVzdGlnYXRlcyB3aGljaCBsZXR0ZXJzIG9jY3VyIG1vc3QgZnJlcXVlbnRseSBpbiBXb3JkbGUgYW5zd2VyIHdvcmRzLiBUaGUgZGF0YXNldCBjb25zaXN0cyBvZiBhIGxpc3Qgb2YgZml2ZS1sZXR0ZXIgRW5nbGlzaCB3b3Jkcywgd2l0aCBlYWNoIHdvcmQgdHJlYXRlZCBhcyBhIHNpbmdsZSBvYnNlcnZhdGlvbi4gVXNpbmcgUiwgZWFjaCB3b3JkIGlzIHNwbGl0IGludG8gaXRzIGluZGl2aWR1YWwgbGV0dGVycywgYW5kIHRoZSBkYXRhIGFyZSByZXNoYXBlZCBzbyB0aGF0IGVhY2ggbGV0dGVyIGFwcGVhcnMgYXMgaXRzIG93biByb3cuIFRoZSBmcmVxdWVuY3kgb2YgZWFjaCBsZXR0ZXIgaXMgdGhlbiBjYWxjdWxhdGVkIGJ5IGNvdW50aW5nIGhvdyBvZnRlbiBpdCBvY2N1cnMgYWNyb3NzIHRoZSBlbnRpcmUgV29yZGxlIGFuc3dlciBsaXN0LiBUaGVzZSBmcmVxdWVuY2llcyBhcmUgdmlzdWFsaXplZCBpbiBhIGJhciBjaGFydCwgbWFraW5nIGl0IGVhc3kgdG8gY29tcGFyZSBob3cgY29tbW9ubHkgZGlmZmVyZW50IGxldHRlcnMgYXBwZWFyIGluIFdvcmRsZSBhbnN3ZXJzLg==