How about some sympathy type words as well ?
Here is a use-case:
err = rnorm()
if(class(err == "try-error"))
praise("We have a error in rnorm ${sympathy}.)
We have a error in rnorm don't worry.
We have a error in rnorm heavens are not gonna fall.
We have a error in rnorm but you are still alive.
We have a error in rnorm but there is ice-cream in the freezer.
We have a error in rnorm it's almost weekend.
pval <- my model
if(pval > 0.2)
praise("Its not you, its the data; ${sympathy}.")
etc....