statquotes v. 0.3.2

install.packages("statquotes")
devtools::install_github("friendly/statquotes")
> library(statquotes)
> statquote()

The best thing about being a statistician is that you get to play in everyone's backyard.
--- John W. Tukey

> statquote("boggle") # or statquote(pattern="boggle")

The statistician has no magic touch by which he may come in at the stage of
tabulation and make something of nothing. Neither will his advice, however wise in
the early stages of a study, ensure successful execution and conclusion. Many a
study, launched on the ways of elegant statistical design, later boggled in
execution, ends up with results to which the theory of probability can contribute
little.
--- W. Edwards Deming, Principles of Professional Statistical Practice. Annals of
Mathematical Statistics, 36(6), 1883. (1965)

> statquote(source="Tukey") # Choose a random quote from a specific author

Whatever the data, we can try to gain understanding by straightening or by flattening. When we
succeed in doing one or both, we almost always see more clearly what is going on.
--- John Tukey, Exploratory Data Analysis, p. 148.

> quote_tags() # list all tags

 [1] "anova"               "assumptions"         "averages"            "bayesian"
 [5] "biometry"            "Box quotes"          "computing"           "correlation"
 [9] "counts"              "data"                "data analysis"       "data visualization"
[13] "design"              "eda"                 "ellipses"            "ethics"
[17] "experimental design" "expt design"         "generalizations"     "geometry"
[21] "history"             "knowledge"           "lsmeans"             "milestones"
[25] "models"              "nhst"                "normality"           "numeracy"
[29] "outliers"            "p-values"            "pictures"            "power"
[33] "probability"         "random numbers"      "research"            "reviews"
[37] "sample size"         "sampling"            "science"             "significance"
[41] "skewness"            "statistician"        "statisticians"       "statistics"
[45] "tables"              "teaching"            "tidy data"           "time"
[49] "time series"         "uncertainty"         "vision"


> statquote(tag="numeracy") # choose a random quote with a specific tag

To be numerate means to be competent, confident, and comfortable with one’s judgements on whether
to use mathematics in a particular situation and if so, what mathematics to use, how to do it,
what degree of accuracy is appropriate, and what the answer means in relation to the context.
--- Diana Coben, Numeracy, mathematics and adult learning, 2000

# To find all quotes with a particular word:
> search_quotes("lsmeans")

Some of us feel that type III sum of squares and so-called LS-means are statistical
nonsense which should have been left in SAS.
--- Brian Ripley, Discussing features of S-Plus, S-news 5.29.1999

I think it would be interesting to ask people who use the results from LSMEANS to explain
what the results represent. My guess is that less than 1% of the people who use LSMEANS
know what they in fact are.
--- Doug Bates, R-help mailing list, 16 Oct 2003
R> statquote("eulogy")

One is so much less than two. [John Tukey's eulogy of his wife.]
--- John Tukey, The life and professional contributions of John W. Tukey, The Annals of
Statistics, 2001, Vol 30, p. 46.
R> cat(as.markdown(statquote("eulogy")))
> *One is so much less than two. [John Tukey's eulogy of his wife.]* -- John Tukey, The life and professional contributions of John W. Tukey, The Annals of Statistics, 2001, Vol 30, p. 46.
R> cat(as.latex(statquote("eulogy")))
\epigraph{One is so much less than two. [John Tukey's eulogy of his wife.]}{John Tukey, The life and professional contributions of John W. Tukey, The Annals of Statistics, 2001, Vol 30, p. 46.}
R> as.data.frame(statquote("eulogy"))
    qid                                                             text     source
411 411 One is so much less than two. [John Tukey's eulogy of his wife.] John Tukey
                                                                                                        cite
411 The life and professional contributions of John W. Tukey, The Annals of Statistics, 2001, Vol 30, p. 46.
     url       tags  tex
411 <NA> statistics <NA>
library(ggplot2)
qt <- quote_tags(table=TRUE)
qtdf <-as.data.frame(qt)
# Sort tags by frequency
qtdf |>
  dplyr::mutate(tags = forcats::fct_reorder(tags, Freq)) |>
  ggplot2::ggplot(aes(x=Freq, y=tags)) +
  geom_bar(stat = "identity")
#quote_cloud("bayes")
quote_cloud()
# Edit .Rprofile in home directory
file.edit(file.path("~", ".Rprofile"))
if(interactive()) statquotes::statquote()

statquotes v. 0.3.2

Installation

Examples

Output formats

Tags

Quote clouds

Quote of the day

Authors

License