# NOT RUN {
test.features <- list(
sentences=18,
words=556,
letters=c(
all=2918,
l1=19,
l2=92,
l3=74,
l4=80,
l5=51,
l6=49
),
syllables=c(
all=974,
s1=316,
s2=116
),
punct=78,
all.chars=3553,
prepositions=74,
conjunctions=18,
pronouns=9,
foreign=0,
TTR=0.5269784,
Bormuth.NOL=192,
Dale.Chall.NOL=192,
Harris.Jacobson.NOL=240,
Spache.NOL=240,
lang="en"
)
# should not calculate FOG, because FOG.hard.words is missing:
readability.num(test.features, index="all")
# }
Run the code above in your browser using DataLab