*! RAM 1.2 17 Sept 2006     Added 24 new quotes
*! RAM 1.1 9 March 2006     Added 18 new quotes
program define njc
    syntax
    tokenize `c(current_time)', parse(:)
    local time = `1'`3'`5'
    local seed = d(`c(current_date)')+`time'
    set seed `seed'
    local r = round(uniform()*57,1)
    if `r'==0 {
    display as result _newline "  Many statistical people would be very happy to see John Nelder knighted, but alas" /*
    */ _newline(2) "  not to date. So, at most, Professor John Nelder, not Sir John."
    display as text "  -Nick Cox, 10 Feb 2006, RE: st: RE: General linear Model"
    }
    if `r'==1 {
        display as result _newline "  In addition, Maarten Buis is naturally correct in drawing attention to -isid-" /*
        */ _newline "  as a possible solution to the narrower question it focuses on."
        display as text "  -Nick Cox, 24 Nov 2005, RE: st: check for double id-numbers"
    }
    if `r'==2 {
        display as result _newline "  Usually, -regress- or -glm-, except that neither captures absolutely all the " /*
        */ _newline "  functionality that some authors associate with GLM. Note that general linear models and " /*
        */ _newline "  generalised linear models are not the same families."
        display as text "  -Nick Cox, 9 Feb 2006, st: RE: General linear Model"
    }
    if `r'==3 {
        display as result _newline "  On a different level, we could all throw our prejudices on the matter into the " /*
        */ _newline "  ring. My own line as a scientist, including roles as reader, author, reviewer/referee and member" /*
        */ _newline "  of editorial boards, is that in science (broad sense) graph designers should stick to one font" /*
        */ _newline "  throughout. But then I cleave to the minimalist-Tufte-Shaker-Bauhaus school of graph design." /*
        */ _newline(2) "  More importantly, so too, broadly speaking, do StataCorp." /*
        */ _newline(2) "  But, notoriously, tastes differ."
        display as text "  -Nick Cox, 28 Jan 2006, st: italics and symbols in graphs"
    }
    if `r'==4 {
        display as result _newline `"  P.S. picky point: there's no stop after "et" in "et al.". In Latin (and in "' /*
        */ _newline `"  French) "et" is a complete word meaning "and".  "'
        display as text "  -Nick Cox, "
    }
    if `r'==5 {
        display as result _newline "  The Edit menu leads to various other possibilities, which predate Stata 8. " /*
        */ _newline(2) "  (I like the new graphics too, but I think I recall that copy and paste of graphs in" /*
        */ _newline "  Windows [not cut and paste] precedes Stata 8.)"
        display as text "  -Nick Cox, 30 Jan 2006, st: RE: Re: wish list item - table "
    }
    if `r'==6 {
        display as result _newline "  Know that that comment has been filed mentally for future reference." /*
        */ _newline "  This is an automated response."
        display as text "  -Nick Cox, 31 Jan 2006, Re: st: How to avoid a break down when convergence is not achieved?"
    }
    if `r'==7 {
        display as result _newline `"   I once got an email saying, in effect, "I am a very big fish in Stataland "' /*
                    */ _newline `"  and asking this question in public would be far too embarrassing." I didn't "' /*
                    */ _newline `"see why not.... Fortunately I have forgotten who it was."'
        display as text "  -Nick Cox, 21 Feb 2006, st: Dear all: and so forth"
    }
    if `r'==8 {
        display as result _newline `"  Never say "One more question". What are you going to say next time?"'
        display as text "  -Nick Cox, 13 Feb 2006, RE: st: data formatting question"
    }
    if `r'==9 {
        display as result _newline "  Note again that this will not be robust to spelling errors."
        display as text "  -Nick Cox, 13 Feb 2006, RE: st: data formatting question"
    }
    if `r'==10 {
        display as result _newline "  Flattered. Or flattened."
        display as text "  -Nick Cox, upon seeing the command -njc-, 13 Feb 2006, st: Re: A new package "
    }

    if `r'==11 {
        display as result _newline "  The Stata manual example somehow evokes the cuisine available in College" /*
        */ _newline "  Station, TX, modulo MadCows."
        display as text "  -Nick Cox, 20 Feb 2006, st: RE: RE: nested logit model"
    }

    if `r'==12 {
        display as result _newline "  Hebe's a she-be." /*
                    */  _newline "  (Hebe Quinton, original questioner)"
        display as text "  -Nick Cox, 20 Feb 2006, RE: st: mean substitution with dummies for adjustment"
    }
    if `r'==13 {
        display as result _newline `"  To balance some long posts over the years, I claim authorship of the"' /*
                    */  _newline `"  shortest Statalist answer ever, which was "C". The question was what"' /*
                    */  _newline `"  language Stata  is written in. "'
        display as text "  -Nick Cox, 21 Feb 2006, st: Dear all: and so forth"
    }
    if `r'==14 {
        display as result _newline " Sometimes, however, people propagate memes that serve no real function, even" /*
                    */  _newline "  decoration, charm or amusement."
        display as text "  -Nick Cox, 21 Feb 2006, st: Dear all: and so forth"
    }
    if `r'==15 {
        display as result _newline " In particular, emails need not take on the conventions of letters. You are" /*
                    */  _newline "  not writing to your bank manager or grandmother when you write to Statalist... "/*
                    */  _newline "  I have done no analysis, as I am not quite that crazy, but it seems to have" /*
                    */  _newline "  increased recently, and I suspect that its use is largely unconscious imitation."
        display as text "  -Nick Cox, 21 Feb 2006, st: Dear all: and so forth"
    }
    if `r'==16 {
        display as result _newline "  Why stop at surmise and speculation?"
        display as text "  -Nick Cox, 15 Feb 2006, RE: st: Structural break"
    }
    if `r'==17 {
        display as result _newline `"  It seems that "without success" is a new variant on that old Statalist"' /*
                    */  _newline `"  standby "doesn't work"! You don't say what you mean by it."'
        display as text "  -Nick Cox, 14 Feb 2006, RE: st: data formatting question"
    }
    if `r'==18 {
        display as result _newline "  Waving newbieness at the list is like waving garlic at a vampire in old" /*
                    */  _newline "  horror films. It is, you may think, a little trick to protect yourself. In" /*
                    */  _newline "  newer horror films the vampires just laugh at garlic and bite you anyway. " /*
                    */  _newline "  In all films nice people are nice anyway and don't need pleas for gentleness."
        display as text "  -Nick Cox, 21 Feb 2006, st: Dear all: and so forth"
    }
    if `r'==19 {
        display as result _newline "  ...so I went in down deep armed with lots of compound double quotes."
        display as text "  -Nick Cox, 22 Feb 2006,st: Various updates on SSC: text editors FAQ, -tabplot-, -tableplot- "
    }

    if `r'==20 {
        display as result _newline "  Yes; I know how to do this."
        display as text "  -Nick Cox, 22 Feb 2006, st: RE: graph bar: frequencies as a label"
    }

    if `r'==21 {
        display as result _newline "  You must evalute, not copy."
        display as text "  -Nick Cox, 20 Feb 2006, st: RE: replicating rows of a matrix"
    }
    if `r'==22 {
        display as result _newline "  This, and related questions, have often been discussed on Statalist and I " /*
                    */  _newline "  continue to get private emails about such questions..."
        display as text "  -Nick Cox, 14 Feb 2006, st: RE: Kernel regressions"
    }
    if `r'==23 {
        display as result _newline "  Statalist members not familiar with them are asked to review the advice" /*
                    */  _newline "  -- and indeed the rules -- on repeat postings."
        display as text "  -Nick Cox, 10 Feb 2006, st: repeat postings"
    }
    if `r'==24 {
        display as result _newline `"  A leading Stata person said to me some years ago, "I don't know how anyone"' /*
                    */  _newline `"   really learns Stata, as it's far too big to master". Naturally, the problem is"' /*
                    */  _newline `"  now worse. I really am not clear that adding yet another resource or thing to"' /*
                    */  _newline `"  monitor is going to help overall."'
        display as text "  -Nick Cox, 7 Feb 2006, RE: st: A Delicious Experiment"
    }
    if `r'==25 {
        display as result _newline "  Note the need for care with missings."
        display as text "  -Nick Cox, 28 November 2005, st: RE: recode values using -foreach- and a numlist (possibly)"
    }
    if `r'==26 {
        display as result _newline "  Other things being equal, what would drive my analysis if this were my " /*
                    */  _newline "  problem is knowing that statistical techniques that feed on ranks as ranks" /*
                    */  _newline "  presume that (apparently) equal values are assigned equal ranks and that the" /*
                    */  _newline "  sum of the ranks is preserved."
        display as text "  -Nick Cox, 25 Nov, 2005, st: RE: variable for birth order"
    }
    if `r'==27 {
        display as result _newline "  Not curious at all, but documented and reasonable."
        display as text `"  -Nick Cox, 24 Nov, 22:24, RE: st: A way to "set more off" forever?"'
    }
    if `r'==28 {
        display as result _newline "  I can't comment on SPSS, which I believe to be another program."
        display as text `"  -Nick Cox, 9 March 2006, st: RE: differentiating missing values in codebook?"'
    }
    if `r'==29 {
        display as result _newline "  This is an FAQ. Here is some possible reading on this and related questions." /*
                        */ _newline _newline "  FAQ     . . . . . . . . . . . . . . . . . . . . . . . Do-it-yourself R-squared" /*
                        */  _newline "  . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .   M. Mouse"/*
                        */  _newline "  9/03    How can I get an R-squared value when a Stata command does not supply one?"/*
                        */  _newline "          http://www.stata.com/support/faqs/stat/rsquared.html"
        display as text "  -Nick Cox, 8 Mar 2006, st: RE: R squared for constrained regression"
        display as text "  Note: Nick had to point this one out himself."
    }
    if `r'==30 {
        display as result _newline "  But there's no rule about fun or spontaneity. "
        display as text "  -Nick Cox, 9 Mar 2006, RE: st: creating unique identifier values"
    }
if `r'==31 {
        display as result _newline `"  And the moral is:  The functions are your friends.  Browse in the help for -functions-."'
        display as text `"  -Nick Cox, 27 June 2006, st: RE: gen new variable, dealing with prefix codes"'
    }

if `r'==32 {
        display as result _newline `"  Whether the Stata is right is immaterial if the statistics is wrong."'
        display as text `"  -Nick Cox, st: RE: iterative kolmogorov smirnov"'
    }
if `r'==33 {
        display as result _newline `"  Acknowledgments Vince Wiggins made encouraging noises. Nick Winter helpfully"'/*
                        */  _newline `"  pointed out a silly bug."'
        display as text `"  -Nick Cox, helpfile of diplot"'
    }
if `r'==34 {
        display as result _newline `"  "mpg" stands for Mr President Gould"'
        display as text `"  -Nick Cox, 25 Aug 2006, RE: st: the meaning of 'foo'"'
    }
if `r'==35 {
        display as result _newline `"  What complications will we need to worry about?...No doubt others that do not"' /*
        */ _newline `"  spring to mind, but that's enough for one posting."'
        display as text `"  -Nick Cox, 1 July 2006, st: Which observations ... ?"'
    }
if `r'==36 {
        display as result _newline `"  I can't speak for STATA. Curiously enough, the same question arises in Stata."'
        display as text `"  -Nick Cox, 23 June 2006, st: RE: Easy question: How to get 0 to show up?  "'
    }
if `r'==37 {
        display as result _newline `"  I am sympathetic to a lot of whimsy. However, more prosaically, I have never "'/*
                       */ _newline `"  experienced an instance in which a Stata programmer changed the version number"'/*
                       */ _newline `"  and left the program otherwise entirely unchanged. Thus if you ignore the evidence"'/*
                       */ _newline `"  of version numbers, you ignore useful evidence."'
        display as text `"  -Nick Cox, 22 June 2006, RE: st: RE: outreg2 + anova = error"'
    }
if `r'==38 {
        display as result _newline `"  Once more from the top:  You think decimal. Stata thinks binary. Sometimes, they just"' /*
                       */ _newline `"  can't match exactly. (We need a rhyming version of this, and a catchy tune, so we can"' /*
                       */ _newline `"  all sing it at users' meetings. On the other hand, perhaps not.) "'
        display as text `"  -Nick Cox, 3 May 2006, st: RE: -forvalues- fails to reach upper limit of range"'
    }
if `r'==39 {
        display as result _newline `"  SMCL is Stata's own mark-up language. The name is a contraction of SMCL Makes Cooler"' /*
                       */ _newline `"  Logs (the documentation is in error on this point)."'
        display as text `"  -Nick Cox, 24 Aug 2006, RE: st: RE: outreg/estimates type commands for ttest"'
    }
if `r'==40 {
        display as result _newline `"  However,deep ignorance never stopped any statistically-minded person from trying to"' /*
                       */ _newline `"  reach conclusions from the data available. (Being able to scroll through posts irrelevant"' /*
                       */ _newline `"  to you has all the advantages of wading through mud when you can skip happily around it.) "'
        display as text `"  -Nick Cox, 2 May 2006, st: http://feeds.feedburner.com/statalist"'
    }
if `r'==41 {
        display as result _newline `"  I did not consider that people might want to drop all adjacent values. Now that has"' /*
                       */ _newline `"   been mentioned, let me say that I have absolutely no intention of modifying any"' /*
                       */ _newline `"  program I write to support what I regard as an extraordinarily bad idea."'
        display as text `"  -Nick Cox, 2 May 2006, st: RE: RE getting rid of the outliers"'
    }
if `r'==42 {
        display as result _newline `"  (You might find it easier to search for his name than for mine in the Statalist archives.)"'
        display as text `"  -Nick Cox, 28 April 2006, st: RE: Balancing survey data in Survey package"'
    }
if `r'==43 {
        display as result _newline `"  StataCorp listens, but may not speak (immediately)."' /*
                       */ _newline `"  Right now, further extending Mata is more obviously a priority than teaching it."' /*
                       */ _newline `"  I have to guess, Kremlinologically and impertinently, that a Mata course will be"' /*
                       */ _newline `"  definitely be offered sooner or later."'"
        display as text `"  -Nick Cox, 19 April 2006, st: RE: mata courses?"'
    }
if `r'==44 {
        display as result _newline `"  Note that neither SSC, nor the author of -makematrix-, nor the Editors of the Stata Journal are to be"' /*
                       */ _newline `"  held responsible for the eigenconsequences, positive or negative, definite or indefinite, of matrices"' /*
                       */ _newline `"  based on varying subsets of the data. "'
        display as text `"  -Nick Cox, "'
    }
if `r'==45 {
        display as result _newline `"  The splendid name apart, I think Box-Cox has been rather oversold."'
        display as text `"  -Nick Cox, 13 April 2006, st: RE: RE: Re: Generating predicted values for OLS with transformed dependent variables "'
    }
if `r'==46 {
        display as result _newline `"  Box-Cox mostly seems to appeal to those terrified of appearing "subjective" or "arbitrary" to advisors"' /*
                       */ _newline `"  and reviewers, and frightened of using their judgement based on experience and theory. I guess that if"' /*
                       */ _newline `"   you have no experience or theory to call upon the appeal will be substantial. It's the same kind of issue"' /*
                       */ _newline `"  as that facing those who will not make the tiniest step without the sanction of a P-value."' /*
                       */ _newline `"  (P = permission to proceed?)"'
        display as text `"  -Nick Cox, 13 april 2006, st: RE: RE: Re: Generating predicted values for OLS with transformed dependent variables"'
    }

if `r'==47 {
        display as result _newline `"  Perhaps you should turn this into a Bayesian problem for some real fun."'
        display as text `"  -Nick Cox, 13 April 2006, RE: st: RE: More on F test and the translog"'
    }
if `r'==48 {
        display as result _newline `"  I'm reminded of a conversation I had in which I mentioned that students from my university play ball "' /*
                       */ _newline `"  games with students from other universities on Wednesday. "Oh", said the other person, from another "' /*
                       */ _newline `"  university, "what a coincidence, so too do students from my place". But it wasn't a coincidence at all:"' /*
                       */ _newline `"  it is all deliberate.  If Durham play Glasgow on Wednesdays, it follows ineluctably that Glasgow play "' /*
                       */ _newline `"  Durham on Wednesdays."'
        display as text `"  -Nick Cox, 13 April 2006, st: RE: RE: RE: More on F test and the translog "'
    }
if `r'==49 {
        display as result _newline `"  Which bit? There are 32 to play with here."'
        display as text `"  -Nick Cox, 13 April 2006, RE: st: RE: rounding in STATA"'
    }
if `r'==50 {
        display as result _newline `"  (In revenge against poor referencers, I'll just give Tukey 1972 as the reference.)"'
        display as text `"  -Nick Cox, 5 April 2006, st: RE: graphing question"'
    }
if `r'==51 {
        display as result _newline `"  The underlying issue is that -graph bar- is not as general as users would like it to be. You'd think"' /*
                       */ _newline `"  that it was a way of drawing every bar graph known to man, woman or cyborg. Ha! Wrong."'
        display as text `"  -Nick Cox, 26 March 2006, RE: st: creating bar charts"'
    }
if `r'==52 {
        display as result _newline `"  N!o. (metasmiley?)"'
        display as text `"  -Nick Cox, 15 March 2006, RE: Re: st: Problem with -graph use- and earlier graph versions"'
    }
if `r'==53 {
        display as result _newline `"  Stata does supply pie charts -- largely so nobody can say "But you can't get a pie chart in Stata!" --"' /*
                       */ _newline `"  but that doesn't make them an effective method for showing comparative structure over time."'
        display as text `"  -Nick Cox, 15 March 2006, st: RE: pie charts"'
    }
if `r'==54 {
        display as result _newline `"  One of the extraordinary features of this method is that it has been re-invented numerous different"' /*
                       */ _newline `"  times and under numerous different names. The oldest use I know is by G.U. Yule about 1910. Deming's"' /*
                       */ _newline `"  use with F. Stephan circa 1940 appears to have been unaware of that, but Yule just used it in passing "' /*
                       */ _newline `"  and didn't sound a fanfare -- didn't even toot a toy trumpet once -- about what he was doing.""'
        display as text `"  -Nick Cox, 26 March 2006, st: RE: Deming adjustments"'
    }
if `r'==55 {
        display as result _newline `"  I'd like to underscore that I forgot the underscore in my example code."'
        display as text `"  -Nick Cox, 27 March 2006, st: RE: RE: Stripping variable labels & putting in local macro"'
    }
if `r'==56 {
        display as result _newline `"  Steve: Now you have to make Maarten and myself co-authors on your paper(s) from this project."' /*
                       */ _newline `"  Buis, Cox and Vaisey sounds good to me. Alphabetism rules KO! "'
        display as text `"  -Nick Cox, 29 Mar 2006, RE: RE: Re: manipulating matrix elements"'
    }
if `r'==57 {
        display as result _newline `"  Luxemburg" and "Luxembourg" are two and the same thing. (We professional geographers are well "' /*
                       */ _newline `"  up on such details.) "'
        display as text `"  -Nick Cox, 29 March 2006, RE: st: generating new observations"'
    }

end