make_bar from compute_posterior function (Lecture 2) not found

[kylap]

Hello! I was wondering if I needed to install a separate library to be able to run the make_bar in the compute_posterior function that was shown in Lecture #2? I tried typing out all the code and running it, however it produced an error saying "Error in make_bar(q): could not find function "make_bar"?

[rmcelreath]

It's in the 3rd edition draft. You can just comment out make_bar if you are running the code from the slides only.

[kylap]

Thank you very much for your response! Apologies for this, I don't have access to the 3rd edition draft as I'm not enrolled in the course. Thank you again!

[Preve92]

I came up with a simple solution:

make_bar <- function(x) paste(rep("#", 20*x), sep = "", collapse = ""

[wbadart]

I found (at least in RStudio w/ R 4.4.1) that

df <- compute_posterier(...)
barplot(df$post, names.arg=df$poss)

gives a good visualization of the posterior. (That's with the bars <- ... line excluded from compute_posterior.)