Do not answer the questions in this thread!
The purpose of this thread to provide a location for students in in my class to practice posting reprex examples.
I can't figure out this error
library(tidyverse)
ggplot(data = mtcars, aes(x = cyl, y = mpga)) +
geom_col()
#> Error in `geom_col()`:
#> ! Problem while computing aesthetics.
#> ℹ Error occurred in the 1st layer.
#> Caused by error:
#> ! object 'mpga' not found
#> Backtrace:
#> ▆
#> 1. ├─base::tryCatch(...)
#> 2. │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
#> 3. │ ├─base (local) tryCatchOne(...)
#> 4. │ │ └─base (local) doTryCatch(return(expr), name, parentenv, handler)
#> 5. │ └─base (local) tryCatchList(expr, names[-nh], parentenv, handlers[-nh])
#> 6. │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
#> 7. │ └─base (local) doTryCatch(return(expr), name, parentenv, handler)
#> 8. ├─base::withCallingHandlers(...)
#> 9. ├─base::saveRDS(...)
#> 10. ├─base::do.call(...)
#> 11. ├─base (local) `<fn>`(...)
#> 12. ├─global `<fn>`(input = base::quote("stuck-crane_reprex.R"))
#> 13. │ └─rmarkdown::render(input, quiet = TRUE, envir = globalenv(), encoding = "UTF-8")
#> 14. │ └─knitr::knit(knit_input, knit_output, envir = envir, quiet = quiet)
#> 15. │ └─knitr:::process_file(text, output)
#> 16. │ ├─base::withCallingHandlers(...)
#> 17. │ ├─base::withCallingHandlers(...)
#> 18. │ ├─knitr:::process_group(group)
#> 19. │ └─knitr:::process_group.block(group)
#> 20. │ └─knitr:::call_block(x)
#> 21. │ └─knitr:::block_exec(params)
#> 22. │ └─knitr:::eng_r(options)
#> 23. │ ├─knitr:::in_input_dir(...)
#> 24. │ │ └─knitr:::in_dir(input_dir(), expr)
#> 25. │ └─knitr (local) evaluate(...)
#> 26. │ └─evaluate::evaluate(...)
#> 27. │ └─evaluate:::evaluate_call(...)
#> 28. │ ├─evaluate (local) handle(...)
#> 29. │ │ └─base::try(f, silent = TRUE)
#> 30. │ │ └─base::tryCatch(...)
#> 31. │ │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
#> 32. │ │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
#> 33. │ │ └─base (local) doTryCatch(return(expr), name, parentenv, handler)
#> 34. │ ├─base::withCallingHandlers(...)
#> 35. │ ├─base::withVisible(value_fun(ev$value, ev$visible))
#> 36. │ └─knitr (local) value_fun(ev$value, ev$visible)
#> 37. │ └─knitr (local) fun(x, options = options)
#> 38. │ ├─base::withVisible(knit_print(x, ...))
#> 39. │ ├─knitr::knit_print(x, ...)
#> 40. │ └─knitr:::knit_print.default(x, ...)
#> 41. │ └─evaluate (local) normal_print(x)
#> 42. │ ├─base::print(x)
#> 43. │ └─ggplot2:::print.ggplot(x)
#> 44. │ ├─ggplot2::ggplot_build(x)
#> 45. │ └─ggplot2:::ggplot_build.ggplot(x)
#> 46. │ └─ggplot2:::by_layer(...)
#> 47. │ ├─rlang::try_fetch(...)
#> 48. │ │ ├─base::tryCatch(...)
#> 49. │ │ │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
#> 50. │ │ │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
#> 51. │ │ │ └─base (local) doTryCatch(return(expr), name, parentenv, handler)
#> 52. │ │ └─base::withCallingHandlers(...)
#> 53. │ └─ggplot2 (local) f(l = layers[[i]], d = data[[i]])
#> 54. │ └─l$compute_aesthetics(d, plot)
#> 55. │ └─ggplot2 (local) compute_aesthetics(..., self = self)
#> 56. │ └─ggplot2:::scales_add_defaults(...)
#> 57. │ └─base::lapply(aesthetics[new_aesthetics], eval_tidy, data = data)
#> 58. │ └─rlang (local) FUN(X[[i]], ...)
#> 59. └─base::.handleSimpleError(`<fn>`, "object 'mpga' not found", base::quote(NULL))
#> 60. └─rlang (local) h(simpleError(msg, call))
#> 61. └─handlers[[1L]](cnd)
#> 62. └─cli::cli_abort(...)
#> 63. └─rlang::abort(...)
Created on 2023-10-08 with reprex v2.0.2
I can't figure out this error
library(tidyverse)
ggplot(data = mtcars, aes(x = cyl, y = mpga)) +
geom_col()
#> Error in `geom_col()`:
#> ! Problem while computing aesthetics.
#> ℹ Error occurred in the 1st layer.
#> Caused by error:
#> ! object 'mpga' not found
#> Backtrace:
#> ▆
#> 1. ├─base::tryCatch(...)
#> 2. │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
#> 3. │ ├─base (local) tryCatchOne(...)
#> 4. │ │ └─base (local) doTryCatch(return(expr), name, parentenv, handler)
#> 5. │ └─base (local) tryCatchList(expr, names[-nh], parentenv, handlers[-nh])
#> 6. │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
#> 7. │ └─base (local) doTryCatch(return(expr), name, parentenv, handler)
#> 8. ├─base::withCallingHandlers(...)
#> 9. ├─base::saveRDS(...)
#> 10. ├─base::do.call(...)
#> 11. ├─base (local) `<fn>`(...)
#> 12. ├─global `<fn>`(input = base::quote("grave-cobra_reprex.R"))
#> 13. │ └─rmarkdown::render(input, quiet = TRUE, envir = globalenv(), encoding = "UTF-8")
#> 14. │ └─knitr::knit(knit_input, knit_output, envir = envir, quiet = quiet)
#> 15. │ └─knitr:::process_file(text, output)
#> 16. │ ├─base::withCallingHandlers(...)
#> 17. │ ├─base::withCallingHandlers(...)
#> 18. │ ├─knitr:::process_group(group)
#> 19. │ └─knitr:::process_group.block(group)
#> 20. │ └─knitr:::call_block(x)
#> 21. │ └─knitr:::block_exec(params)
#> 22. │ └─knitr:::eng_r(options)
#> 23. │ ├─knitr:::in_input_dir(...)
#> 24. │ │ └─knitr:::in_dir(input_dir(), expr)
#> 25. │ └─knitr (local) evaluate(...)
#> 26. │ └─evaluate::evaluate(...)
#> 27. │ └─evaluate:::evaluate_call(...)
#> 28. │ ├─evaluate (local) handle(...)
#> 29. │ │ └─base::try(f, silent = TRUE)
#> 30. │ │ └─base::tryCatch(...)
#> 31. │ │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
#> 32. │ │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
#> 33. │ │ └─base (local) doTryCatch(return(expr), name, parentenv, handler)
#> 34. │ ├─base::withCallingHandlers(...)
#> 35. │ ├─base::withVisible(value_fun(ev$value, ev$visible))
#> 36. │ └─knitr (local) value_fun(ev$value, ev$visible)
#> 37. │ └─knitr (local) fun(x, options = options)
#> 38. │ ├─base::withVisible(knit_print(x, ...))
#> 39. │ ├─knitr::knit_print(x, ...)
#> 40. │ └─knitr:::knit_print.default(x, ...)
#> 41. │ └─evaluate (local) normal_print(x)
#> 42. │ ├─base::print(x)
#> 43. │ └─ggplot2:::print.ggplot(x)
#> 44. │ ├─ggplot2::ggplot_build(x)
#> 45. │ └─ggplot2:::ggplot_build.ggplot(x)
#> 46. │ └─ggplot2:::by_layer(...)
#> 47. │ ├─rlang::try_fetch(...)
#> 48. │ │ ├─base::tryCatch(...)
#> 49. │ │ │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
#> 50. │ │ │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
#> 51. │ │ │ └─base (local) doTryCatch(return(expr), name, parentenv, handler)
#> 52. │ │ └─base::withCallingHandlers(...)
#> 53. │ └─ggplot2 (local) f(l = layers[[i]], d = data[[i]])
#> 54. │ └─l$compute_aesthetics(d, plot)
#> 55. │ └─ggplot2 (local) compute_aesthetics(..., self = self)
#> 56. │ └─ggplot2:::scales_add_defaults(...)
#> 57. │ └─base::lapply(aesthetics[new_aesthetics], eval_tidy, data = data)
#> 58. │ └─rlang (local) FUN(X[[i]], ...)
#> 59. └─base::.handleSimpleError(`<fn>`, "object 'mpga' not found", base::quote(NULL))
#> 60. └─rlang (local) h(simpleError(msg, call))
#> 61. └─handlers[[1L]](cnd)
#> 62. └─cli::cli_abort(...)
#> 63. └─rlang::abort(...)
Created on 2023-10-09 with reprex v2.0.2
I can't figure out this error.
library(tidyverse)
ggplot(mtcars, aes(x = cyl, y = mpga)) +
geom_col()
#> Error in `geom_col()`:
#> ! Problem while computing aesthetics.
#> ℹ Error occurred in the 1st layer.
#> Caused by error:
#> ! object 'mpga' not found
#> Backtrace:
#> ▆
#> 1. ├─base::tryCatch(...)
#> 2. │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
#> 3. │ ├─base (local) tryCatchOne(...)
#> 4. │ │ └─base (local) doTryCatch(return(expr), name, parentenv, handler)
#> 5. │ └─base (local) tryCatchList(expr, names[-nh], parentenv, handlers[-nh])
#> 6. │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
#> 7. │ └─base (local) doTryCatch(return(expr), name, parentenv, handler)
#> 8. ├─base::withCallingHandlers(...)
#> 9. ├─base::saveRDS(...)
#> 10. ├─base::do.call(...)
#> 11. ├─base (local) `<fn>`(...)
#> 12. ├─global `<fn>`(input = base::quote("brave-mara_reprex.R"))
#> 13. │ └─rmarkdown::render(input, quiet = TRUE, envir = globalenv(), encoding = "UTF-8")
#> 14. │ └─knitr::knit(knit_input, knit_output, envir = envir, quiet = quiet)
#> 15. │ └─knitr:::process_file(text, output)
#> 16. │ ├─base::withCallingHandlers(...)
#> 17. │ ├─base::withCallingHandlers(...)
#> 18. │ ├─knitr:::process_group(group)
#> 19. │ └─knitr:::process_group.block(group)
#> 20. │ └─knitr:::call_block(x)
#> 21. │ └─knitr:::block_exec(params)
#> 22. │ └─knitr:::eng_r(options)
#> 23. │ ├─knitr:::in_input_dir(...)
#> 24. │ │ └─knitr:::in_dir(input_dir(), expr)
#> 25. │ └─knitr (local) evaluate(...)
#> 26. │ └─evaluate::evaluate(...)
#> 27. │ └─evaluate:::evaluate_call(...)
#> 28. │ ├─evaluate (local) handle(...)
#> 29. │ │ └─base::try(f, silent = TRUE)
#> 30. │ │ └─base::tryCatch(...)
#> 31. │ │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
#> 32. │ │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
#> 33. │ │ └─base (local) doTryCatch(return(expr), name, parentenv, handler)
#> 34. │ ├─base::withCallingHandlers(...)
#> 35. │ ├─base::withVisible(value_fun(ev$value, ev$visible))
#> 36. │ └─knitr (local) value_fun(ev$value, ev$visible)
#> 37. │ └─knitr (local) fun(x, options = options)
#> 38. │ ├─base::withVisible(knit_print(x, ...))
#> 39. │ ├─knitr::knit_print(x, ...)
#> 40. │ └─knitr:::knit_print.default(x, ...)
#> 41. │ └─evaluate (local) normal_print(x)
#> 42. │ ├─base::print(x)
#> 43. │ └─ggplot2:::print.ggplot(x)
#> 44. │ ├─ggplot2::ggplot_build(x)
#> 45. │ └─ggplot2:::ggplot_build.ggplot(x)
#> 46. │ └─ggplot2:::by_layer(...)
#> 47. │ ├─rlang::try_fetch(...)
#> 48. │ │ ├─base::tryCatch(...)
#> 49. │ │ │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
#> 50. │ │ │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
#> 51. │ │ │ └─base (local) doTryCatch(return(expr), name, parentenv, handler)
#> 52. │ │ └─base::withCallingHandlers(...)
#> 53. │ └─ggplot2 (local) f(l = layers[[i]], d = data[[i]])
#> 54. │ └─l$compute_aesthetics(d, plot)
#> 55. │ └─ggplot2 (local) compute_aesthetics(..., self = self)
#> 56. │ └─ggplot2:::scales_add_defaults(...)
#> 57. │ └─base::lapply(aesthetics[new_aesthetics], eval_tidy, data = data)
#> 58. │ └─rlang (local) FUN(X[[i]], ...)
#> 59. └─base::.handleSimpleError(`<fn>`, "object 'mpga' not found", base::quote(NULL))
#> 60. └─rlang (local) h(simpleError(msg, call))
#> 61. └─handlers[[1L]](cnd)
#> 62. └─cli::cli_abort(...)
#> 63. └─rlang::abort(...)
Created on 2023-10-08 with reprex v2.0.2
I can't figure out this error.
library(tidyverse)
mtcars|> ggplot(aes(x = cyl, y = mpga)) +
geom_col()
#> Error in `geom_col()`:
#> ! Problem while computing aesthetics.
#> ℹ Error occurred in the 1st layer.
#> Caused by error:
#> ! object 'mpga' not found
#> Backtrace:
#> ▆
#> 1. ├─base::tryCatch(...)
#> 2. │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
#> 3. │ ├─base (local) tryCatchOne(...)
#> 4. │ │ └─base (local) doTryCatch(return(expr), name, parentenv, handler)
#> 5. │ └─base (local) tryCatchList(expr, names[-nh], parentenv, handlers[-nh])
#> 6. │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
#> 7. │ └─base (local) doTryCatch(return(expr), name, parentenv, handler)
#> 8. ├─base::withCallingHandlers(...)
#> 9. ├─base::saveRDS(...)
#> 10. ├─base::do.call(...)
#> 11. ├─base (local) `<fn>`(...)
#> 12. ├─global `<fn>`(input = base::quote("drear-kitty_reprex.R"))
#> 13. │ └─rmarkdown::render(input, quiet = TRUE, envir = globalenv(), encoding = "UTF-8")
#> 14. │ └─knitr::knit(knit_input, knit_output, envir = envir, quiet = quiet)
#> 15. │ └─knitr:::process_file(text, output)
#> 16. │ ├─base::withCallingHandlers(...)
#> 17. │ ├─base::withCallingHandlers(...)
#> 18. │ ├─knitr:::process_group(group)
#> 19. │ └─knitr:::process_group.block(group)
#> 20. │ └─knitr:::call_block(x)
#> 21. │ └─knitr:::block_exec(params)
#> 22. │ └─knitr:::eng_r(options)
#> 23. │ ├─knitr:::in_input_dir(...)
#> 24. │ │ └─knitr:::in_dir(input_dir(), expr)
#> 25. │ └─knitr (local) evaluate(...)
#> 26. │ └─evaluate::evaluate(...)
#> 27. │ └─evaluate:::evaluate_call(...)
#> 28. │ ├─evaluate (local) handle(...)
#> 29. │ │ └─base::try(f, silent = TRUE)
#> 30. │ │ └─base::tryCatch(...)
#> 31. │ │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
#> 32. │ │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
#> 33. │ │ └─base (local) doTryCatch(return(expr), name, parentenv, handler)
#> 34. │ ├─base::withCallingHandlers(...)
#> 35. │ ├─base::withVisible(value_fun(ev$value, ev$visible))
#> 36. │ └─knitr (local) value_fun(ev$value, ev$visible)
#> 37. │ └─knitr (local) fun(x, options = options)
#> 38. │ ├─base::withVisible(knit_print(x, ...))
#> 39. │ ├─knitr::knit_print(x, ...)
#> 40. │ └─knitr:::knit_print.default(x, ...)
#> 41. │ └─evaluate (local) normal_print(x)
#> 42. │ ├─base::print(x)
#> 43. │ └─ggplot2:::print.ggplot(x)
#> 44. │ ├─ggplot2::ggplot_build(x)
#> 45. │ └─ggplot2:::ggplot_build.ggplot(x)
#> 46. │ └─ggplot2:::by_layer(...)
#> 47. │ ├─rlang::try_fetch(...)
#> 48. │ │ ├─base::tryCatch(...)
#> 49. │ │ │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
#> 50. │ │ │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
#> 51. │ │ │ └─base (local) doTryCatch(return(expr), name, parentenv, handler)
#> 52. │ │ └─base::withCallingHandlers(...)
#> 53. │ └─ggplot2 (local) f(l = layers[[i]], d = data[[i]])
#> 54. │ └─l$compute_aesthetics(d, plot)
#> 55. │ └─ggplot2 (local) compute_aesthetics(..., self = self)
#> 56. │ └─ggplot2:::scales_add_defaults(...)
#> 57. │ └─base::lapply(aesthetics[new_aesthetics], eval_tidy, data = data)
#> 58. │ └─rlang (local) FUN(X[[i]], ...)
#> 59. └─base::.handleSimpleError(`<fn>`, "object 'mpga' not found", base::quote(NULL))
#> 60. └─rlang (local) h(simpleError(msg, call))
#> 61. └─handlers[[1L]](cnd)
#> 62. └─cli::cli_abort(...)
#> 63. └─rlang::abort(...)
Created on 2023-10-10 with reprex v2.0.2
I can’t figure out this error
library(tidyverse)
ggplot(data = mtcars, aes(x = cyl, y = mpga)) +
geom_col()
#> Error in `geom_col()`:
#> ! Problem while computing aesthetics.
#> ℹ Error occurred in the 1st layer.
#> Caused by error:
#> ! object 'mpga' not found
#> Backtrace:
#> ▆
#> 1. ├─base::tryCatch(...)
#> 2. │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
#> 3. │ ├─base (local) tryCatchOne(...)
#> 4. │ │ └─base (local) doTryCatch(return(expr), name, parentenv, handler)
#> 5. │ └─base (local) tryCatchList(expr, names[-nh], parentenv, handlers[-nh])
#> 6. │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
#> 7. │ └─base (local) doTryCatch(return(expr), name, parentenv, handler)
#> 8. ├─base::withCallingHandlers(...)
#> 9. ├─base::saveRDS(...)
#> 10. ├─base::do.call(...)
#> 11. ├─base (local) `<fn>`(...)
#> 12. ├─global `<fn>`(input = base::quote("satin-urial_reprex.R"))
#> 13. │ └─rmarkdown::render(input, quiet = TRUE, envir = globalenv(), encoding = "UTF-8")
#> 14. │ └─knitr::knit(knit_input, knit_output, envir = envir, quiet = quiet)
#> 15. │ └─knitr:::process_file(text, output)
#> 16. │ ├─base::withCallingHandlers(...)
#> 17. │ ├─base::withCallingHandlers(...)
#> 18. │ ├─knitr:::process_group(group)
#> 19. │ └─knitr:::process_group.block(group)
#> 20. │ └─knitr:::call_block(x)
#> 21. │ └─knitr:::block_exec(params)
#> 22. │ └─knitr:::eng_r(options)
#> 23. │ ├─knitr:::in_input_dir(...)
#> 24. │ │ └─knitr:::in_dir(input_dir(), expr)
#> 25. │ └─knitr (local) evaluate(...)
#> 26. │ └─evaluate::evaluate(...)
#> 27. │ └─evaluate:::evaluate_call(...)
#> 28. │ ├─evaluate (local) handle(...)
#> 29. │ │ └─base::try(f, silent = TRUE)
#> 30. │ │ └─base::tryCatch(...)
#> 31. │ │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
#> 32. │ │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
#> 33. │ │ └─base (local) doTryCatch(return(expr), name, parentenv, handler)
#> 34. │ ├─base::withCallingHandlers(...)
#> 35. │ ├─base::withVisible(value_fun(ev$value, ev$visible))
#> 36. │ └─knitr (local) value_fun(ev$value, ev$visible)
#> 37. │ └─knitr (local) fun(x, options = options)
#> 38. │ ├─base::withVisible(knit_print(x, ...))
#> 39. │ ├─knitr::knit_print(x, ...)
#> 40. │ └─knitr:::knit_print.default(x, ...)
#> 41. │ └─evaluate (local) normal_print(x)
#> 42. │ ├─base::print(x)
#> 43. │ └─ggplot2:::print.ggplot(x)
#> 44. │ ├─ggplot2::ggplot_build(x)
#> 45. │ └─ggplot2:::ggplot_build.ggplot(x)
#> 46. │ └─ggplot2:::by_layer(...)
#> 47. │ ├─rlang::try_fetch(...)
#> 48. │ │ ├─base::tryCatch(...)
#> 49. │ │ │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
#> 50. │ │ │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
#> 51. │ │ │ └─base (local) doTryCatch(return(expr), name, parentenv, handler)
#> 52. │ │ └─base::withCallingHandlers(...)
#> 53. │ └─ggplot2 (local) f(l = layers[[i]], d = data[[i]])
#> 54. │ └─l$compute_aesthetics(d, plot)
#> 55. │ └─ggplot2 (local) compute_aesthetics(..., self = self)
#> 56. │ └─ggplot2:::scales_add_defaults(...)
#> 57. │ └─base::lapply(aesthetics[new_aesthetics], eval_tidy, data = data)
#> 58. │ └─rlang (local) FUN(X[[i]], ...)
#> 59. └─base::.handleSimpleError(`<fn>`, "object 'mpga' not found", base::quote(NULL))
#> 60. └─rlang (local) h(simpleError(msg, call))
#> 61. └─handlers[[1L]](cnd)
#> 62. └─cli::cli_abort(...)
#> 63. └─rlang::abort(...)
Created on 2023-10-10 with reprex v2.0.2
I can't figure out this error
library(tidyverse)
ggplot(mtcars, aes(x = cyl, y = mpga)) +
geom_col()
#> Error in `geom_col()`:
#> ! Problem while computing aesthetics.
#> ℹ Error occurred in the 1st layer.
#> Caused by error:
#> ! object 'mpga' not found
#> Backtrace:
#> ▆
#> 1. ├─base::tryCatch(...)
#> 2. │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
#> 3. │ ├─base (local) tryCatchOne(...)
#> 4. │ │ └─base (local) doTryCatch(return(expr), name, parentenv, handler)
#> 5. │ └─base (local) tryCatchList(expr, names[-nh], parentenv, handlers[-nh])
#> 6. │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
#> 7. │ └─base (local) doTryCatch(return(expr), name, parentenv, handler)
#> 8. ├─base::withCallingHandlers(...)
#> 9. ├─base::saveRDS(...)
#> 10. ├─base::do.call(...)
#> 11. ├─base (local) `<fn>`(...)
#> 12. ├─global `<fn>`(input = base::quote("brave-mara_reprex.R"))
#> 13. │ └─rmarkdown::render(input, quiet = TRUE, envir = globalenv(), encoding = "UTF-8")
#> 14. │ └─knitr::knit(knit_input, knit_output, envir = envir, quiet = quiet)
#> 15. │ └─knitr:::process_file(text, output)
#> 16. │ ├─base::withCallingHandlers(...)
#> 17. │ ├─base::withCallingHandlers(...)
#> 18. │ ├─knitr:::process_group(group)
#> 19. │ └─knitr:::process_group.block(group)
#> 20. │ └─knitr:::call_block(x)
#> 21. │ └─knitr:::block_exec(params)
#> 22. │ └─knitr:::eng_r(options)
#> 23. │ ├─knitr:::in_input_dir(...)
#> 24. │ │ └─knitr:::in_dir(input_dir(), expr)
#> 25. │ └─knitr (local) evaluate(...)
#> 26. │ └─evaluate::evaluate(...)
#> 27. │ └─evaluate:::evaluate_call(...)
#> 28. │ ├─evaluate (local) handle(...)
#> 29. │ │ └─base::try(f, silent = TRUE)
#> 30. │ │ └─base::tryCatch(...)
#> 31. │ │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
#> 32. │ │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
#> 33. │ │ └─base (local) doTryCatch(return(expr), name, parentenv, handler)
#> 34. │ ├─base::withCallingHandlers(...)
#> 35. │ ├─base::withVisible(value_fun(ev$value, ev$visible))
#> 36. │ └─knitr (local) value_fun(ev$value, ev$visible)
#> 37. │ └─knitr (local) fun(x, options = options)
#> 38. │ ├─base::withVisible(knit_print(x, ...))
#> 39. │ ├─knitr::knit_print(x, ...)
#> 40. │ └─knitr:::knit_print.default(x, ...)
#> 41. │ └─evaluate (local) normal_print(x)
#> 42. │ ├─base::print(x)
#> 43. │ └─ggplot2:::print.ggplot(x)
#> 44. │ ├─ggplot2::ggplot_build(x)
#> 45. │ └─ggplot2:::ggplot_build.ggplot(x)
#> 46. │ └─ggplot2:::by_layer(...)
#> 47. │ ├─rlang::try_fetch(...)
#> 48. │ │ ├─base::tryCatch(...)
#> 49. │ │ │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
#> 50. │ │ │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
#> 51. │ │ │ └─base (local) doTryCatch(return(expr), name, parentenv, handler)
#> 52. │ │ └─base::withCallingHandlers(...)
#> 53. │ └─ggplot2 (local) f(l = layers[[i]], d = data[[i]])
#> 54. │ └─l$compute_aesthetics(d, plot)
#> 55. │ └─ggplot2 (local) compute_aesthetics(..., self = self)
#> 56. │ └─ggplot2:::scales_add_defaults(...)
#> 57. │ └─base::lapply(aesthetics[new_aesthetics], eval_tidy, data = data)
#> 58. │ └─rlang (local) FUN(X[[i]], ...)
#> 59. └─base::.handleSimpleError(`<fn>`, "object 'mpga' not found", base::quote(NULL))
#> 60. └─rlang (local) h(simpleError(msg, call))
#> 61. └─handlers[[1L]](cnd)
#> 62. └─cli::cli_abort(...)
#> 63. └─rlang::abort(...)
I can’t figure out this error
library(tidyverse)
ggplot(data = mtcars, aes(x = cyl, y = mpga)) + geom_col()
#> Error in `geom_col()`:
#> ! Problem while computing aesthetics.
#> ℹ Error occurred in the 1st layer.
#> Caused by error:
#> ! object 'mpga' not found
#> Backtrace:
#> ▆
#> 1. ├─base::tryCatch(...)
#> 2. │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
#> 3. │ ├─base (local) tryCatchOne(...)
#> 4. │ │ └─base (local) doTryCatch(return(expr), name, parentenv, handler)
#> 5. │ └─base (local) tryCatchList(expr, names[-nh], parentenv, handlers[-nh])
#> 6. │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
#> 7. │ └─base (local) doTryCatch(return(expr), name, parentenv, handler)
#> 8. ├─base::withCallingHandlers(...)
#> 9. ├─base::saveRDS(...)
#> 10. ├─base::do.call(...)
#> 11. ├─base (local) `<fn>`(...)
#> 12. ├─global `<fn>`(input = base::quote("bonny-fox_reprex.R"))
#> 13. │ └─rmarkdown::render(input, quiet = TRUE, envir = globalenv(), encoding = "UTF-8")
#> 14. │ └─knitr::knit(knit_input, knit_output, envir = envir, quiet = quiet)
#> 15. │ └─knitr:::process_file(text, output)
#> 16. │ ├─base::withCallingHandlers(...)
#> 17. │ ├─base::withCallingHandlers(...)
#> 18. │ ├─knitr:::process_group(group)
#> 19. │ └─knitr:::process_group.block(group)
#> 20. │ └─knitr:::call_block(x)
#> 21. │ └─knitr:::block_exec(params)
#> 22. │ └─knitr:::eng_r(options)
#> 23. │ ├─knitr:::in_input_dir(...)
#> 24. │ │ └─knitr:::in_dir(input_dir(), expr)
#> 25. │ └─knitr (local) evaluate(...)
#> 26. │ └─evaluate::evaluate(...)
#> 27. │ └─evaluate:::evaluate_call(...)
#> 28. │ ├─evaluate (local) handle(...)
#> 29. │ │ └─base::try(f, silent = TRUE)
#> 30. │ │ └─base::tryCatch(...)
#> 31. │ │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
#> 32. │ │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
#> 33. │ │ └─base (local) doTryCatch(return(expr), name, parentenv, handler)
#> 34. │ ├─base::withCallingHandlers(...)
#> 35. │ ├─base::withVisible(value_fun(ev$value, ev$visible))
#> 36. │ └─knitr (local) value_fun(ev$value, ev$visible)
#> 37. │ └─knitr (local) fun(x, options = options)
#> 38. │ ├─base::withVisible(knit_print(x, ...))
#> 39. │ ├─knitr::knit_print(x, ...)
#> 40. │ └─knitr:::knit_print.default(x, ...)
#> 41. │ └─evaluate (local) normal_print(x)
#> 42. │ ├─base::print(x)
#> 43. │ └─ggplot2:::print.ggplot(x)
#> 44. │ ├─ggplot2::ggplot_build(x)
#> 45. │ └─ggplot2:::ggplot_build.ggplot(x)
#> 46. │ └─ggplot2:::by_layer(...)
#> 47. │ ├─rlang::try_fetch(...)
#> 48. │ │ ├─base::tryCatch(...)
#> 49. │ │ │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
#> 50. │ │ │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
#> 51. │ │ │ └─base (local) doTryCatch(return(expr), name, parentenv, handler)
#> 52. │ │ └─base::withCallingHandlers(...)
#> 53. │ └─ggplot2 (local) f(l = layers[[i]], d = data[[i]])
#> 54. │ └─l$compute_aesthetics(d, plot)
#> 55. │ └─ggplot2 (local) compute_aesthetics(..., self = self)
#> 56. │ └─ggplot2:::scales_add_defaults(...)
#> 57. │ └─base::lapply(aesthetics[new_aesthetics], eval_tidy, data = data)
#> 58. │ └─rlang (local) FUN(X[[i]], ...)
#> 59. └─base::.handleSimpleError(`<fn>`, "object 'mpga' not found", base::quote(NULL))
#> 60. └─rlang (local) h(simpleError(msg, call))
#> 61. └─handlers[[1L]](cnd)
#> 62. └─cli::cli_abort(...)
#> 63. └─rlang::abort(...)
library(reprex)
search()
#> [1] ".GlobalEnv" "package:reprex" "package:lubridate"
#> [4] "package:forcats" "package:stringr" "package:dplyr"
#> [7] "package:purrr" "package:readr" "package:tidyr"
#> [10] "package:tibble" "package:ggplot2" "package:tidyverse"
#> [13] "package:stats" "package:graphics" "package:grDevices"
#> [16] "package:utils" "package:datasets" "package:methods"
#> [19] "Autoloads" "tools:callr" "package:base"
I can't figure out this error
library(tidyverse)
library(reprex)
ggplot(data = mtcars, aes(x = cyl, y = mpga)) +
geom_col()
#> Error in `geom_col()`:
#> ! Problem while computing aesthetics.
#> ℹ Error occurred in the 1st layer.
#> Caused by error:
#> ! object 'mpga' not found
#> Backtrace:
#> ▆
#> 1. ├─base::tryCatch(...)
#> 2. │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
#> 3. │ ├─base (local) tryCatchOne(...)
#> 4. │ │ └─base (local) doTryCatch(return(expr), name, parentenv, handler)
#> 5. │ └─base (local) tryCatchList(expr, names[-nh], parentenv, handlers[-nh])
#> 6. │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
#> 7. │ └─base (local) doTryCatch(return(expr), name, parentenv, handler)
#> 8. ├─base::withCallingHandlers(...)
#> 9. ├─base::saveRDS(...)
#> 10. ├─base::do.call(...)
#> 11. ├─base (local) `<fn>`(...)
#> 12. ├─global `<fn>`(input = base::quote("dopey-nyala_reprex.R"))
#> 13. │ └─rmarkdown::render(input, quiet = TRUE, envir = globalenv(), encoding = "UTF-8")
#> 14. │ └─knitr::knit(knit_input, knit_output, envir = envir, quiet = quiet)
#> 15. │ └─knitr:::process_file(text, output)
#> 16. │ ├─base::withCallingHandlers(...)
#> 17. │ ├─base::withCallingHandlers(...)
#> 18. │ ├─knitr:::process_group(group)
#> 19. │ └─knitr:::process_group.block(group)
#> 20. │ └─knitr:::call_block(x)
#> 21. │ └─knitr:::block_exec(params)
#> 22. │ └─knitr:::eng_r(options)
#> 23. │ ├─knitr:::in_input_dir(...)
#> 24. │ │ └─knitr:::in_dir(input_dir(), expr)
#> 25. │ └─knitr (local) evaluate(...)
#> 26. │ └─evaluate::evaluate(...)
#> 27. │ └─evaluate:::evaluate_call(...)
#> 28. │ ├─evaluate (local) handle(...)
#> 29. │ │ └─base::try(f, silent = TRUE)
#> 30. │ │ └─base::tryCatch(...)
#> 31. │ │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
#> 32. │ │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
#> 33. │ │ └─base (local) doTryCatch(return(expr), name, parentenv, handler)
#> 34. │ ├─base::withCallingHandlers(...)
#> 35. │ ├─base::withVisible(value_fun(ev$value, ev$visible))
#> 36. │ └─knitr (local) value_fun(ev$value, ev$visible)
#> 37. │ └─knitr (local) fun(x, options = options)
#> 38. │ ├─base::withVisible(knit_print(x, ...))
#> 39. │ ├─knitr::knit_print(x, ...)
#> 40. │ └─knitr:::knit_print.default(x, ...)
#> 41. │ └─evaluate (local) normal_print(x)
#> 42. │ ├─base::print(x)
#> 43. │ └─ggplot2:::print.ggplot(x)
#> 44. │ ├─ggplot2::ggplot_build(x)
#> 45. │ └─ggplot2:::ggplot_build.ggplot(x)
#> 46. │ └─ggplot2:::by_layer(...)
#> 47. │ ├─rlang::try_fetch(...)
#> 48. │ │ ├─base::tryCatch(...)
#> 49. │ │ │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
#> 50. │ │ │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
#> 51. │ │ │ └─base (local) doTryCatch(return(expr), name, parentenv, handler)
#> 52. │ │ └─base::withCallingHandlers(...)
#> 53. │ └─ggplot2 (local) f(l = layers[[i]], d = data[[i]])
#> 54. │ └─l$compute_aesthetics(d, plot)
#> 55. │ └─ggplot2 (local) compute_aesthetics(..., self = self)
#> 56. │ └─ggplot2:::scales_add_defaults(...)
#> 57. │ └─base::lapply(aesthetics[new_aesthetics], eval_tidy, data = data)
#> 58. │ └─rlang (local) FUN(X[[i]], ...)
#> 59. └─base::.handleSimpleError(`<fn>`, "object 'mpga' not found", base::quote(NULL))
#> 60. └─rlang (local) h(simpleError(msg, call))
#> 61. └─handlers[[1L]](cnd)
#> 62. └─cli::cli_abort(...)
#> 63. └─rlang::abort(...)
Created on 2023-10-11 with reprex v2.0.2
I can't figure out this error
library(tidyverse)
ggplot(data = mtcars, aes(x = cy1, y= mpga))+
geom_col()
#> Error in `geom_col()`:
#> ! Problem while computing aesthetics.
#> ℹ Error occurred in the 1st layer.
#> Caused by error:
#> ! object 'cy1' not found
#> Backtrace:
#> ▆
#> 1. ├─base::tryCatch(...)
#> 2. │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
#> 3. │ ├─base (local) tryCatchOne(...)
#> 4. │ │ └─base (local) doTryCatch(return(expr), name, parentenv, handler)
#> 5. │ └─base (local) tryCatchList(expr, names[-nh], parentenv, handlers[-nh])
#> 6. │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
#> 7. │ └─base (local) doTryCatch(return(expr), name, parentenv, handler)
#> 8. ├─base::withCallingHandlers(...)
#> 9. ├─base::saveRDS(...)
#> 10. ├─base::do.call(...)
#> 11. ├─base (local) `<fn>`(...)
#> 12. ├─global `<fn>`(input = base::quote("awful-dog_reprex.R"))
#> 13. │ └─rmarkdown::render(input, quiet = TRUE, envir = globalenv(), encoding = "UTF-8")
#> 14. │ └─knitr::knit(knit_input, knit_output, envir = envir, quiet = quiet)
#> 15. │ └─knitr:::process_file(text, output)
#> 16. │ ├─base::withCallingHandlers(...)
#> 17. │ ├─base::withCallingHandlers(...)
#> 18. │ ├─knitr:::process_group(group)
#> 19. │ └─knitr:::process_group.block(group)
#> 20. │ └─knitr:::call_block(x)
#> 21. │ └─knitr:::block_exec(params)
#> 22. │ └─knitr:::eng_r(options)
#> 23. │ ├─knitr:::in_input_dir(...)
#> 24. │ │ └─knitr:::in_dir(input_dir(), expr)
#> 25. │ └─knitr (local) evaluate(...)
#> 26. │ └─evaluate::evaluate(...)
#> 27. │ └─evaluate:::evaluate_call(...)
#> 28. │ ├─evaluate (local) handle(...)
#> 29. │ │ └─base::try(f, silent = TRUE)
#> 30. │ │ └─base::tryCatch(...)
#> 31. │ │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
#> 32. │ │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
#> 33. │ │ └─base (local) doTryCatch(return(expr), name, parentenv, handler)
#> 34. │ ├─base::withCallingHandlers(...)
#> 35. │ ├─base::withVisible(value_fun(ev$value, ev$visible))
#> 36. │ └─knitr (local) value_fun(ev$value, ev$visible)
#> 37. │ └─knitr (local) fun(x, options = options)
#> 38. │ ├─base::withVisible(knit_print(x, ...))
#> 39. │ ├─knitr::knit_print(x, ...)
#> 40. │ └─knitr:::knit_print.default(x, ...)
#> 41. │ └─evaluate (local) normal_print(x)
#> 42. │ ├─base::print(x)
#> 43. │ └─ggplot2:::print.ggplot(x)
#> 44. │ ├─ggplot2::ggplot_build(x)
#> 45. │ └─ggplot2:::ggplot_build.ggplot(x)
#> 46. │ └─ggplot2:::by_layer(...)
#> 47. │ ├─rlang::try_fetch(...)
#> 48. │ │ ├─base::tryCatch(...)
#> 49. │ │ │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
#> 50. │ │ │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
#> 51. │ │ │ └─base (local) doTryCatch(return(expr), name, parentenv, handler)
#> 52. │ │ └─base::withCallingHandlers(...)
#> 53. │ └─ggplot2 (local) f(l = layers[[i]], d = data[[i]])
#> 54. │ └─l$compute_aesthetics(d, plot)
#> 55. │ └─ggplot2 (local) compute_aesthetics(..., self = self)
#> 56. │ └─ggplot2:::scales_add_defaults(...)
#> 57. │ └─base::lapply(aesthetics[new_aesthetics], eval_tidy, data = data)
#> 58. │ └─rlang (local) FUN(X[[i]], ...)
#> 59. └─base::.handleSimpleError(`<fn>`, "object 'cy1' not found", base::quote(NULL))
#> 60. └─rlang (local) h(simpleError(msg, call))
#> 61. └─handlers[[1L]](cnd)
#> 62. └─cli::cli_abort(...)
#> 63. └─rlang::abort(...)
Created on 2023-10-11 with reprex v2.0.2
I can't figure out this error
library(tidyverse)
library(reprex)
ggplot(data = mtcars, aes(x = cyl, y = mpga)) +
geom_col()
#> Error in `geom_col()`:
#> ! Problem while computing aesthetics.
#> ℹ Error occurred in the 1st layer.
#> Caused by error:
#> ! object 'mpga' not found
#> Backtrace:
#> ▆
#> 1. ├─base::tryCatch(...)
#> 2. │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
#> 3. │ ├─base (local) tryCatchOne(...)
#> 4. │ │ └─base (local) doTryCatch(return(expr), name, parentenv, handler)
#> 5. │ └─base (local) tryCatchList(expr, names[-nh], parentenv, handlers[-nh])
#> 6. │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
#> 7. │ └─base (local) doTryCatch(return(expr), name, parentenv, handler)
#> 8. ├─base::withCallingHandlers(...)
#> 9. ├─base::saveRDS(...)
#> 10. ├─base::do.call(...)
#> 11. ├─base (local) `<fn>`(...)
#> 12. ├─global `<fn>`(input = base::quote("cocky-doe_reprex.R"))
#> 13. │ └─rmarkdown::render(input, quiet = TRUE, envir = globalenv(), encoding = "UTF-8")
#> 14. │ └─knitr::knit(knit_input, knit_output, envir = envir, quiet = quiet)
#> 15. │ └─knitr:::process_file(text, output)
#> 16. │ ├─base::withCallingHandlers(...)
#> 17. │ ├─base::withCallingHandlers(...)
#> 18. │ ├─knitr:::process_group(group)
#> 19. │ └─knitr:::process_group.block(group)
#> 20. │ └─knitr:::call_block(x)
#> 21. │ └─knitr:::block_exec(params)
#> 22. │ └─knitr:::eng_r(options)
#> 23. │ ├─knitr:::in_input_dir(...)
#> 24. │ │ └─knitr:::in_dir(input_dir(), expr)
#> 25. │ └─knitr (local) evaluate(...)
#> 26. │ └─evaluate::evaluate(...)
#> 27. │ └─evaluate:::evaluate_call(...)
#> 28. │ ├─evaluate (local) handle(...)
#> 29. │ │ └─base::try(f, silent = TRUE)
#> 30. │ │ └─base::tryCatch(...)
#> 31. │ │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
#> 32. │ │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
#> 33. │ │ └─base (local) doTryCatch(return(expr), name, parentenv, handler)
#> 34. │ ├─base::withCallingHandlers(...)
#> 35. │ ├─base::withVisible(value_fun(ev$value, ev$visible))
#> 36. │ └─knitr (local) value_fun(ev$value, ev$visible)
#> 37. │ └─knitr (local) fun(x, options = options)
#> 38. │ ├─base::withVisible(knit_print(x, ...))
#> 39. │ ├─knitr::knit_print(x, ...)
#> 40. │ └─knitr:::knit_print.default(x, ...)
#> 41. │ └─evaluate (local) normal_print(x)
#> 42. │ ├─base::print(x)
#> 43. │ └─ggplot2:::print.ggplot(x)
#> 44. │ ├─ggplot2::ggplot_build(x)
#> 45. │ └─ggplot2:::ggplot_build.ggplot(x)
#> 46. │ └─ggplot2:::by_layer(...)
#> 47. │ ├─rlang::try_fetch(...)
#> 48. │ │ ├─base::tryCatch(...)
#> 49. │ │ │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
#> 50. │ │ │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
#> 51. │ │ │ └─base (local) doTryCatch(return(expr), name, parentenv, handler)
#> 52. │ │ └─base::withCallingHandlers(...)
#> 53. │ └─ggplot2 (local) f(l = layers[[i]], d = data[[i]])
#> 54. │ └─l$compute_aesthetics(d, plot)
#> 55. │ └─ggplot2 (local) compute_aesthetics(..., self = self)
#> 56. │ └─ggplot2:::scales_add_defaults(...)
#> 57. │ └─base::lapply(aesthetics[new_aesthetics], eval_tidy, data = data)
#> 58. │ └─rlang (local) FUN(X[[i]], ...)
#> 59. └─base::.handleSimpleError(`<fn>`, "object 'mpga' not found", base::quote(NULL))
#> 60. └─rlang (local) h(simpleError(msg, call))
#> 61. └─handlers[[1L]](cnd)
#> 62. └─cli::cli_abort(...)
#> 63. └─rlang::abort(...)
Created on 2023-10-11 with reprex v2.0.2
I can't figure out this error
library(tidyverse)
ggplot(data = mtcars, aes(x = cyl, y = mpga)) +
geom_col()
#> Error in `geom_col()`:
#> ! Problem while computing aesthetics.
#> ℹ Error occurred in the 1st layer.
#> Caused by error:
#> ! object 'mpga' not found
#> Backtrace:
#> ▆
#> 1. ├─base::tryCatch(...)
#> 2. │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
#> 3. │ ├─base (local) tryCatchOne(...)
#> 4. │ │ └─base (local) doTryCatch(return(expr), name, parentenv, handler)
#> 5. │ └─base (local) tryCatchList(expr, names[-nh], parentenv, handlers[-nh])
#> 6. │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
#> 7. │ └─base (local) doTryCatch(return(expr), name, parentenv, handler)
#> 8. ├─base::withCallingHandlers(...)
#> 9. ├─base::saveRDS(...)
#> 10. ├─base::do.call(...)
#> 11. ├─base (local) `<fn>`(...)
#> 12. ├─global `<fn>`(input = base::quote("front-ray_reprex.R"))
#> 13. │ └─rmarkdown::render(input, quiet = TRUE, envir = globalenv(), encoding = "UTF-8")
#> 14. │ └─knitr::knit(knit_input, knit_output, envir = envir, quiet = quiet)
#> 15. │ └─knitr:::process_file(text, output)
#> 16. │ ├─base::withCallingHandlers(...)
#> 17. │ ├─base::withCallingHandlers(...)
#> 18. │ ├─knitr:::process_group(group)
#> 19. │ └─knitr:::process_group.block(group)
#> 20. │ └─knitr:::call_block(x)
#> 21. │ └─knitr:::block_exec(params)
#> 22. │ └─knitr:::eng_r(options)
#> 23. │ ├─knitr:::in_input_dir(...)
#> 24. │ │ └─knitr:::in_dir(input_dir(), expr)
#> 25. │ └─knitr (local) evaluate(...)
#> 26. │ └─evaluate::evaluate(...)
#> 27. │ └─evaluate:::evaluate_call(...)
#> 28. │ ├─evaluate (local) handle(...)
#> 29. │ │ └─base::try(f, silent = TRUE)
#> 30. │ │ └─base::tryCatch(...)
#> 31. │ │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
#> 32. │ │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
#> 33. │ │ └─base (local) doTryCatch(return(expr), name, parentenv, handler)
#> 34. │ ├─base::withCallingHandlers(...)
#> 35. │ ├─base::withVisible(value_fun(ev$value, ev$visible))
#> 36. │ └─knitr (local) value_fun(ev$value, ev$visible)
#> 37. │ └─knitr (local) fun(x, options = options)
#> 38. │ ├─base::withVisible(knit_print(x, ...))
#> 39. │ ├─knitr::knit_print(x, ...)
#> 40. │ └─knitr:::knit_print.default(x, ...)
#> 41. │ └─evaluate (local) normal_print(x)
#> 42. │ ├─base::print(x)
#> 43. │ └─ggplot2:::print.ggplot(x)
#> 44. │ ├─ggplot2::ggplot_build(x)
#> 45. │ └─ggplot2:::ggplot_build.ggplot(x)
#> 46. │ └─ggplot2:::by_layer(...)
#> 47. │ ├─rlang::try_fetch(...)
#> 48. │ │ ├─base::tryCatch(...)
#> 49. │ │ │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
#> 50. │ │ │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
#> 51. │ │ │ └─base (local) doTryCatch(return(expr), name, parentenv, handler)
#> 52. │ │ └─base::withCallingHandlers(...)
#> 53. │ └─ggplot2 (local) f(l = layers[[i]], d = data[[i]])
#> 54. │ └─l$compute_aesthetics(d, plot)
#> 55. │ └─ggplot2 (local) compute_aesthetics(..., self = self)
#> 56. │ └─ggplot2:::scales_add_defaults(...)
#> 57. │ └─base::lapply(aesthetics[new_aesthetics], eval_tidy, data = data)
#> 58. │ └─rlang (local) FUN(X[[i]], ...)
#> 59. └─base::.handleSimpleError(`<fn>`, "object 'mpga' not found", base::quote(NULL))
#> 60. └─rlang (local) h(simpleError(msg, call))
#> 61. └─handlers[[1L]](cnd)
#> 62. └─cli::cli_abort(...)
#> 63. └─rlang::abort(...)
Created on 2023-10-11 with reprex v2.0.2
I can’t figure out this error
library(tidyverse)
ggplot(mtcars, aes(x = cyl, y = mpga)) + geom_col()
#> Error in `geom_col()`:
#> ! Problem while computing aesthetics.
#> ℹ Error occurred in the 1st layer.
#> Caused by error:
#> ! object 'mpga' not found
#> Backtrace:
#> ▆
#> 1. ├─base::tryCatch(...)
#> 2. │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
#> 3. │ ├─base (local) tryCatchOne(...)
#> 4. │ │ └─base (local) doTryCatch(return(expr), name, parentenv, handler)
#> 5. │ └─base (local) tryCatchList(expr, names[-nh], parentenv, handlers[-nh])
#> 6. │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
#> 7. │ └─base (local) doTryCatch(return(expr), name, parentenv, handler)
#> 8. ├─base::withCallingHandlers(...)
#> 9. ├─base::saveRDS(...)
#> 10. ├─base::do.call(...)
#> 11. ├─base (local) `<fn>`(...)
#> 12. ├─global `<fn>`(input = base::quote("large-unau_reprex.R"))
#> 13. │ └─rmarkdown::render(input, quiet = TRUE, envir = globalenv(), encoding = "UTF-8")
#> 14. │ └─knitr::knit(knit_input, knit_output, envir = envir, quiet = quiet)
#> 15. │ └─knitr:::process_file(text, output)
#> 16. │ ├─base::withCallingHandlers(...)
#> 17. │ ├─base::withCallingHandlers(...)
#> 18. │ ├─knitr:::process_group(group)
#> 19. │ └─knitr:::process_group.block(group)
#> 20. │ └─knitr:::call_block(x)
#> 21. │ └─knitr:::block_exec(params)
#> 22. │ └─knitr:::eng_r(options)
#> 23. │ ├─knitr:::in_input_dir(...)
#> 24. │ │ └─knitr:::in_dir(input_dir(), expr)
#> 25. │ └─knitr (local) evaluate(...)
#> 26. │ └─evaluate::evaluate(...)
#> 27. │ └─evaluate:::evaluate_call(...)
#> 28. │ ├─evaluate (local) handle(...)
#> 29. │ │ └─base::try(f, silent = TRUE)
#> 30. │ │ └─base::tryCatch(...)
#> 31. │ │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
#> 32. │ │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
#> 33. │ │ └─base (local) doTryCatch(return(expr), name, parentenv, handler)
#> 34. │ ├─base::withCallingHandlers(...)
#> 35. │ ├─base::withVisible(value_fun(ev$value, ev$visible))
#> 36. │ └─knitr (local) value_fun(ev$value, ev$visible)
#> 37. │ └─knitr (local) fun(x, options = options)
#> 38. │ ├─base::withVisible(knit_print(x, ...))
#> 39. │ ├─knitr::knit_print(x, ...)
#> 40. │ └─knitr:::knit_print.default(x, ...)
#> 41. │ └─evaluate (local) normal_print(x)
#> 42. │ ├─base::print(x)
#> 43. │ └─ggplot2:::print.ggplot(x)
#> 44. │ ├─ggplot2::ggplot_build(x)
#> 45. │ └─ggplot2:::ggplot_build.ggplot(x)
#> 46. │ └─ggplot2:::by_layer(...)
#> 47. │ ├─rlang::try_fetch(...)
#> 48. │ │ ├─base::tryCatch(...)
#> 49. │ │ │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
#> 50. │ │ │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
#> 51. │ │ │ └─base (local) doTryCatch(return(expr), name, parentenv, handler)
#> 52. │ │ └─base::withCallingHandlers(...)
#> 53. │ └─ggplot2 (local) f(l = layers[[i]], d = data[[i]])
#> 54. │ └─l$compute_aesthetics(d, plot)
#> 55. │ └─ggplot2 (local) compute_aesthetics(..., self = self)
#> 56. │ └─ggplot2:::scales_add_defaults(...)
#> 57. │ └─base::lapply(aesthetics[new_aesthetics], eval_tidy, data = data)
#> 58. │ └─rlang (local) FUN(X[[i]], ...)
#> 59. └─base::.handleSimpleError(`<fn>`, "object 'mpga' not found", base::quote(NULL))
#> 60. └─rlang (local) h(simpleError(msg, call))
#> 61. └─handlers[[1L]](cnd)
#> 62. └─cli::cli_abort(...)
#> 63. └─rlang::abort(...)
Created on 2023-10-11 with reprex v2.0.2
I can't figure out this error:
library(tidyverse)
mtcars |> ggplot(aes(x = cyl, y = mpga)) +
geom_col()
#> Error in geom_col():
#> ! Problem while computing aesthetics.
#> 
Error occurred in the 1st layer.
#> Caused by error:
#> ! object 'mpga' not found
#> Backtrace:
#> ▆
#> 1. ├─base::tryCatch(...)
#> 2. │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
#> 3. │ ├─base (local) tryCatchOne(...)
#> 4. │ │ └─base (local) doTryCatch(return(expr), name, parentenv, handler)
#> 5. │ └─base (local) tryCatchList(expr, names[-nh], parentenv, handlers[-nh])
#> 6. │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
#> 7. │ └─base (local) doTryCatch(return(expr), name, parentenv, handler)
#> 8. ├─base::withCallingHandlers(...)
#> 9. ├─base::saveRDS(...)
#> 10. ├─base::do.call(...)
#> 11. ├─base (local) <fn>(...)
#> 12. ├─global <fn>(input = base::quote("peppy-flea_reprex.R"))
#> 13. │ └─rmarkdown::render(input, quiet = TRUE, envir = globalenv(), encoding = "UTF-8")
#> 14. │ └─knitr::knit(knit_input, knit_output, envir = envir, quiet = quiet)
#> 15. │ └─knitr:::process_file(text, output)
#> 16. │ ├─base::withCallingHandlers(...)
#> 17. │ ├─base::withCallingHandlers(...)
#> 18. │ ├─knitr:::process_group(group)
#> 19. │ └─knitr:::process_group.block(group)
#> 20. │ └─knitr:::call_block(x)
#> 21. │ └─knitr:::block_exec(params)
#> 22. │ └─knitr:::eng_r(options)
#> 23. │ ├─knitr:::in_input_dir(...)
#> 24. │ │ └─knitr:::in_dir(input_dir(), expr)
#> 25. │ └─knitr (local) evaluate(...)
#> 26. │ └─evaluate::evaluate(...)
#> 27. │ └─evaluate:::evaluate_call(...)
#> 28. │ ├─evaluate (local) handle(...)
#> 29. │ │ └─base::try(f, silent = TRUE)
#> 30. │ │ └─base::tryCatch(...)
#> 31. │ │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
#> 32. │ │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
#> 33. │ │ └─base (local) doTryCatch(return(expr), name, parentenv, handler)
#> 34. │ ├─base::withCallingHandlers(...)
#> 35. │ ├─base::withVisible(value_fun(ev$value, ev$visible))
#> 36. │ └─knitr (local) value_fun(ev$value, ev$visible)
#> 37. │ └─knitr (local) fun(x, options = options)
#> 38. │ ├─base::withVisible(knit_print(x, ...))
#> 39. │ ├─knitr::knit_print(x, ...)
#> 40. │ └─knitr:::knit_print.default(x, ...)
#> 41. │ └─evaluate (local) normal_print(x)
#> 42. │ ├─base::print(x)
#> 43. │ └─ggplot2:::print.ggplot(x)
#> 44. │ ├─ggplot2::ggplot_build(x)
#> 45. │ └─ggplot2:::ggplot_build.ggplot(x)
#> 46. │ └─ggplot2:::by_layer(...)
#> 47. │ ├─rlang::try_fetch(...)
#> 48. │ │ ├─base::tryCatch(...)
#> 49. │ │ │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
#> 50. │ │ │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
#> 51. │ │ │ └─base (local) doTryCatch(return(expr), name, parentenv, handler)
#> 52. │ │ └─base::withCallingHandlers(...)
#> 53. │ └─ggplot2 (local) f(l = layers[[i]], d = data[[i]])
#> 54. │ └─l$compute_aesthetics(d, plot)
#> 55. │ └─ggplot2 (local) compute_aesthetics(..., self = self)
#> 56. │ └─ggplot2:::scales_add_defaults(...)
#> 57. │ └─base::lapply(aesthetics[new_aesthetics], eval_tidy, data = data)
#> 58. │ └─rlang (local) FUN(X[[i]], ...)
#> 59. └─base::.handleSimpleError(<fn>, "object 'mpga' not found", base::quote(NULL))
#> 60. └─rlang (local) h(simpleError(msg, call))
#> 61. └─handlers[1L]
#> 62. └─cli::cli_abort(...)
#> 63. └─rlang::abort(...)
#RT07 Notes
#learnr::run_tutorial(name = "09-workflow-getting-help", package = "r4ds.tutorials")
Created on 2023-10-10 with reprex v2.0.2
I can't figure out this error.
I can't figure out this error.
library(tidyverse)
ggplot(data = mtcars, aes(x = cyl, y = mpga)) + geom_col()
#> Error in `geom_col()`:
#> ! Problem while computing aesthetics.
#> ℹ Error occurred in the 1st layer.
#> Caused by error:
#> ! object 'mpga' not found
#> Backtrace:
#> ▆
#> 1. ├─base::tryCatch(...)
#> 2. │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
#> 3. │ ├─base (local) tryCatchOne(...)
#> 4. │ │ └─base (local) doTryCatch(return(expr), name, parentenv, handler)
#> 5. │ └─base (local) tryCatchList(expr, names[-nh], parentenv, handlers[-nh])
#> 6. │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
#> 7. │ └─base (local) doTryCatch(return(expr), name, parentenv, handler)
#> 8. ├─base::withCallingHandlers(...)
#> 9. ├─base::saveRDS(...)
#> 10. ├─base::do.call(...)
#> 11. ├─base (local) `<fn>`(...)
#> 12. ├─global `<fn>`(input = base::quote("hurt-puma_reprex.R"))
#> 13. │ └─rmarkdown::render(input, quiet = TRUE, envir = globalenv(), encoding = "UTF-8")
#> 14. │ └─knitr::knit(knit_input, knit_output, envir = envir, quiet = quiet)
#> 15. │ └─knitr:::process_file(text, output)
#> 16. │ ├─base::withCallingHandlers(...)
#> 17. │ ├─base::withCallingHandlers(...)
#> 18. │ ├─knitr:::process_group(group)
#> 19. │ └─knitr:::process_group.block(group)
#> 20. │ └─knitr:::call_block(x)
#> 21. │ └─knitr:::block_exec(params)
#> 22. │ └─knitr:::eng_r(options)
#> 23. │ ├─knitr:::in_input_dir(...)
#> 24. │ │ └─knitr:::in_dir(input_dir(), expr)
#> 25. │ └─knitr (local) evaluate(...)
#> 26. │ └─evaluate::evaluate(...)
#> 27. │ └─evaluate:::evaluate_call(...)
#> 28. │ ├─evaluate (local) handle(...)
#> 29. │ │ └─base::try(f, silent = TRUE)
#> 30. │ │ └─base::tryCatch(...)
#> 31. │ │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
#> 32. │ │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
#> 33. │ │ └─base (local) doTryCatch(return(expr), name, parentenv, handler)
#> 34. │ ├─base::withCallingHandlers(...)
#> 35. │ ├─base::withVisible(value_fun(ev$value, ev$visible))
#> 36. │ └─knitr (local) value_fun(ev$value, ev$visible)
#> 37. │ └─knitr (local) fun(x, options = options)
#> 38. │ ├─base::withVisible(knit_print(x, ...))
#> 39. │ ├─knitr::knit_print(x, ...)
#> 40. │ └─knitr:::knit_print.default(x, ...)
#> 41. │ └─evaluate (local) normal_print(x)
#> 42. │ ├─base::print(x)
#> 43. │ └─ggplot2:::print.ggplot(x)
#> 44. │ ├─ggplot2::ggplot_build(x)
#> 45. │ └─ggplot2:::ggplot_build.ggplot(x)
#> 46. │ └─ggplot2:::by_layer(...)
#> 47. │ ├─rlang::try_fetch(...)
#> 48. │ │ ├─base::tryCatch(...)
#> 49. │ │ │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
#> 50. │ │ │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
#> 51. │ │ │ └─base (local) doTryCatch(return(expr), name, parentenv, handler)
#> 52. │ │ └─base::withCallingHandlers(...)
#> 53. │ └─ggplot2 (local) f(l = layers[[i]], d = data[[i]])
#> 54. │ └─l$compute_aesthetics(d, plot)
#> 55. │ └─ggplot2 (local) compute_aesthetics(..., self = self)
#> 56. │ └─ggplot2:::scales_add_defaults(...)
#> 57. │ └─base::lapply(aesthetics[new_aesthetics], eval_tidy, data = data)
#> 58. │ └─rlang (local) FUN(X[[i]], ...)
#> 59. └─base::.handleSimpleError(`<fn>`, "object 'mpga' not found", base::quote(NULL))
#> 60. └─rlang (local) h(simpleError(msg, call))
#> 61. └─handlers[[1L]](cnd)
#> 62. └─cli::cli_abort(...)
#> 63. └─rlang::abort(...)
Created on 2023-10-10 with reprex v2.0.2
I can't figure out this error
library(tidyverse)
ggplot(mtcars, aes(x = cyl, y = mpga)) +
geom_col()
#> Error in `geom_col()`:
#> ! Problem while computing aesthetics.
#> ℹ Error occurred in the 1st layer.
#> Caused by error:
#> ! object 'mpga' not found
#> Backtrace:
#> ▆
#> 1. ├─base::tryCatch(...)
#> 2. │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
#> 3. │ ├─base (local) tryCatchOne(...)
#> 4. │ │ └─base (local) doTryCatch(return(expr), name, parentenv, handler)
#> 5. │ └─base (local) tryCatchList(expr, names[-nh], parentenv, handlers[-nh])
#> 6. │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
#> 7. │ └─base (local) doTryCatch(return(expr), name, parentenv, handler)
#> 8. ├─base::withCallingHandlers(...)
#> 9. ├─base::saveRDS(...)
#> 10. ├─base::do.call(...)
#> 11. ├─base (local) `<fn>`(...)
#> 12. ├─global `<fn>`(input = base::quote("irate-booby_reprex.R"))
#> 13. │ └─rmarkdown::render(input, quiet = TRUE, envir = globalenv(), encoding = "UTF-8")
#> 14. │ └─knitr::knit(knit_input, knit_output, envir = envir, quiet = quiet)
#> 15. │ └─knitr:::process_file(text, output)
#> 16. │ ├─base::withCallingHandlers(...)
#> 17. │ ├─base::withCallingHandlers(...)
#> 18. │ ├─knitr:::process_group(group)
#> 19. │ └─knitr:::process_group.block(group)
#> 20. │ └─knitr:::call_block(x)
#> 21. │ └─knitr:::block_exec(params)
#> 22. │ └─knitr:::eng_r(options)
#> 23. │ ├─knitr:::in_input_dir(...)
#> 24. │ │ └─knitr:::in_dir(input_dir(), expr)
#> 25. │ └─knitr (local) evaluate(...)
#> 26. │ └─evaluate::evaluate(...)
#> 27. │ └─evaluate:::evaluate_call(...)
#> 28. │ ├─evaluate (local) handle(...)
#> 29. │ │ └─base::try(f, silent = TRUE)
#> 30. │ │ └─base::tryCatch(...)
#> 31. │ │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
#> 32. │ │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
#> 33. │ │ └─base (local) doTryCatch(return(expr), name, parentenv, handler)
#> 34. │ ├─base::withCallingHandlers(...)
#> 35. │ ├─base::withVisible(value_fun(ev$value, ev$visible))
#> 36. │ └─knitr (local) value_fun(ev$value, ev$visible)
#> 37. │ └─knitr (local) fun(x, options = options)
#> 38. │ ├─base::withVisible(knit_print(x, ...))
#> 39. │ ├─knitr::knit_print(x, ...)
#> 40. │ └─knitr:::knit_print.default(x, ...)
#> 41. │ └─evaluate (local) normal_print(x)
#> 42. │ ├─base::print(x)
#> 43. │ └─ggplot2:::print.ggplot(x)
#> 44. │ ├─ggplot2::ggplot_build(x)
#> 45. │ └─ggplot2:::ggplot_build.ggplot(x)
#> 46. │ └─ggplot2:::by_layer(...)
#> 47. │ ├─rlang::try_fetch(...)
#> 48. │ │ ├─base::tryCatch(...)
#> 49. │ │ │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
#> 50. │ │ │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
#> 51. │ │ │ └─base (local) doTryCatch(return(expr), name, parentenv, handler)
#> 52. │ │ └─base::withCallingHandlers(...)
#> 53. │ └─ggplot2 (local) f(l = layers[[i]], d = data[[i]])
#> 54. │ └─l$compute_aesthetics(d, plot)
#> 55. │ └─ggplot2 (local) compute_aesthetics(..., self = self)
#> 56. │ └─ggplot2:::scales_add_defaults(...)
#> 57. │ └─base::lapply(aesthetics[new_aesthetics], eval_tidy, data = data)
#> 58. │ └─rlang (local) FUN(X[[i]], ...)
#> 59. └─base::.handleSimpleError(`<fn>`, "object 'mpga' not found", base::quote(NULL))
#> 60. └─rlang (local) h(simpleError(msg, call))
#> 61. └─handlers[[1L]](cnd)
#> 62. └─cli::cli_abort(...)
#> 63. └─rlang::abort(...)
library(tidyverse)
ggplot(mtcars, aes(x = cyl, y = mpg)) +
geom_col()
[image]
library(reprex)
Created on 2023-10-12 with reprex v2.0.2
I can't figure out this error.
library(tidyverse)
ggplot(data = mtcars, aes(x = cyl, y = mpga)) +
geom_col()
#> Error in `geom_col()`:
#> ! Problem while computing aesthetics.
#> ℹ Error occurred in the 1st layer.
#> Caused by error:
#> ! object 'mpga' not found
#> Backtrace:
#> ▆
#> 1. ├─base::tryCatch(...)
#> 2. │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
#> 3. │ ├─base (local) tryCatchOne(...)
#> 4. │ │ └─base (local) doTryCatch(return(expr), name, parentenv, handler)
#> 5. │ └─base (local) tryCatchList(expr, names[-nh], parentenv, handlers[-nh])
#> 6. │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
#> 7. │ └─base (local) doTryCatch(return(expr), name, parentenv, handler)
#> 8. ├─base::withCallingHandlers(...)
#> 9. ├─base::saveRDS(...)
#> 10. ├─base::do.call(...)
#> 11. ├─base (local) `<fn>`(...)
#> 12. ├─global `<fn>`(input = base::quote("rainy-quail_reprex.R"))
#> 13. │ └─rmarkdown::render(input, quiet = TRUE, envir = globalenv(), encoding = "UTF-8")
#> 14. │ └─knitr::knit(knit_input, knit_output, envir = envir, quiet = quiet)
#> 15. │ └─knitr:::process_file(text, output)
#> 16. │ ├─base::withCallingHandlers(...)
#> 17. │ ├─base::withCallingHandlers(...)
#> 18. │ ├─knitr:::process_group(group)
#> 19. │ └─knitr:::process_group.block(group)
#> 20. │ └─knitr:::call_block(x)
#> 21. │ └─knitr:::block_exec(params)
#> 22. │ └─knitr:::eng_r(options)
#> 23. │ ├─knitr:::in_input_dir(...)
#> 24. │ │ └─knitr:::in_dir(input_dir(), expr)
#> 25. │ └─knitr (local) evaluate(...)
#> 26. │ └─evaluate::evaluate(...)
#> 27. │ └─evaluate:::evaluate_call(...)
#> 28. │ ├─evaluate (local) handle(...)
#> 29. │ │ └─base::try(f, silent = TRUE)
#> 30. │ │ └─base::tryCatch(...)
#> 31. │ │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
#> 32. │ │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
#> 33. │ │ └─base (local) doTryCatch(return(expr), name, parentenv, handler)
#> 34. │ ├─base::withCallingHandlers(...)
#> 35. │ ├─base::withVisible(value_fun(ev$value, ev$visible))
#> 36. │ └─knitr (local) value_fun(ev$value, ev$visible)
#> 37. │ └─knitr (local) fun(x, options = options)
#> 38. │ ├─base::withVisible(knit_print(x, ...))
#> 39. │ ├─knitr::knit_print(x, ...)
#> 40. │ └─knitr:::knit_print.default(x, ...)
#> 41. │ └─evaluate (local) normal_print(x)
#> 42. │ ├─base::print(x)
#> 43. │ └─ggplot2:::print.ggplot(x)
#> 44. │ ├─ggplot2::ggplot_build(x)
#> 45. │ └─ggplot2:::ggplot_build.ggplot(x)
#> 46. │ └─ggplot2:::by_layer(...)
#> 47. │ ├─rlang::try_fetch(...)
#> 48. │ │ ├─base::tryCatch(...)
#> 49. │ │ │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
#> 50. │ │ │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
#> 51. │ │ │ └─base (local) doTryCatch(return(expr), name, parentenv, handler)
#> 52. │ │ └─base::withCallingHandlers(...)
#> 53. │ └─ggplot2 (local) f(l = layers[[i]], d = data[[i]])
#> 54. │ └─l$compute_aesthetics(d, plot)
#> 55. │ └─ggplot2 (local) compute_aesthetics(..., self = self)
#> 56. │ └─ggplot2:::scales_add_defaults(...)
#> 57. │ └─base::lapply(aesthetics[new_aesthetics], eval_tidy, data = data)
#> 58. │ └─rlang (local) FUN(X[[i]], ...)
#> 59. └─base::.handleSimpleError(`<fn>`, "object 'mpga' not found", base::quote(NULL))
#> 60. └─rlang (local) h(simpleError(msg, call))
#> 61. └─handlers[[1L]](cnd)
#> 62. └─cli::cli_abort(...)
#> 63. └─rlang::abort(...)
I can't figure out this error
library(tidyverse)
data <- mtcars |>
ggplot(mapping = aes(x = cyl, y = mpga)) +
geom_col()
data
#> Error in `geom_col()`:
#> ! Problem while computing aesthetics.
#> ℹ Error occurred in the 1st layer.
#> Caused by error:
#> ! object 'mpga' not found
#> Backtrace:
#> ▆
#> 1. ├─base::tryCatch(...)
#> 2. │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
#> 3. │ ├─base (local) tryCatchOne(...)
#> 4. │ │ └─base (local) doTryCatch(return(expr), name, parentenv, handler)
#> 5. │ └─base (local) tryCatchList(expr, names[-nh], parentenv, handlers[-nh])
#> 6. │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
#> 7. │ └─base (local) doTryCatch(return(expr), name, parentenv, handler)
#> 8. ├─base::withCallingHandlers(...)
#> 9. ├─base::saveRDS(...)
#> 10. ├─base::do.call(...)
#> 11. ├─base (local) `<fn>`(...)
#> 12. ├─global `<fn>`(input = base::quote("pious-rhino_reprex.R"))
#> 13. │ └─rmarkdown::render(input, quiet = TRUE, envir = globalenv(), encoding = "UTF-8")
#> 14. │ └─knitr::knit(knit_input, knit_output, envir = envir, quiet = quiet)
#> 15. │ └─knitr:::process_file(text, output)
#> 16. │ ├─base::withCallingHandlers(...)
#> 17. │ ├─base::withCallingHandlers(...)
#> 18. │ ├─knitr:::process_group(group)
#> 19. │ └─knitr:::process_group.block(group)
#> 20. │ └─knitr:::call_block(x)
#> 21. │ └─knitr:::block_exec(params)
#> 22. │ └─knitr:::eng_r(options)
#> 23. │ ├─knitr:::in_input_dir(...)
#> 24. │ │ └─knitr:::in_dir(input_dir(), expr)
#> 25. │ └─knitr (local) evaluate(...)
#> 26. │ └─evaluate::evaluate(...)
#> 27. │ └─evaluate:::evaluate_call(...)
#> 28. │ ├─evaluate (local) handle(...)
#> 29. │ │ └─base::try(f, silent = TRUE)
#> 30. │ │ └─base::tryCatch(...)
#> 31. │ │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
#> 32. │ │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
#> 33. │ │ └─base (local) doTryCatch(return(expr), name, parentenv, handler)
#> 34. │ ├─base::withCallingHandlers(...)
#> 35. │ ├─base::withVisible(value_fun(ev$value, ev$visible))
#> 36. │ └─knitr (local) value_fun(ev$value, ev$visible)
#> 37. │ └─knitr (local) fun(x, options = options)
#> 38. │ ├─base::withVisible(knit_print(x, ...))
#> 39. │ ├─knitr::knit_print(x, ...)
#> 40. │ └─knitr:::knit_print.default(x, ...)
#> 41. │ └─evaluate (local) normal_print(x)
#> 42. │ ├─base::print(x)
#> 43. │ └─ggplot2:::print.ggplot(x)
#> 44. │ ├─ggplot2::ggplot_build(x)
#> 45. │ └─ggplot2:::ggplot_build.ggplot(x)
#> 46. │ └─ggplot2:::by_layer(...)
#> 47. │ ├─rlang::try_fetch(...)
#> 48. │ │ ├─base::tryCatch(...)
#> 49. │ │ │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
#> 50. │ │ │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
#> 51. │ │ │ └─base (local) doTryCatch(return(expr), name, parentenv, handler)
#> 52. │ │ └─base::withCallingHandlers(...)
#> 53. │ └─ggplot2 (local) f(l = layers[[i]], d = data[[i]])
#> 54. │ └─l$compute_aesthetics(d, plot)
#> 55. │ └─ggplot2 (local) compute_aesthetics(..., self = self)
#> 56. │ └─ggplot2:::scales_add_defaults(...)
#> 57. │ └─base::lapply(aesthetics[new_aesthetics], eval_tidy, data = data)
#> 58. │ └─rlang (local) FUN(X[[i]], ...)
#> 59. └─base::.handleSimpleError(`<fn>`, "object 'mpga' not found", base::quote(NULL))
#> 60. └─rlang (local) h(simpleError(msg, call))
#> 61. └─handlers[[1L]](cnd)
#> 62. └─cli::cli_abort(...)
#> 63. └─rlang::abort(...)
Created on 2023-10-12 with reprex v2.0.2