已经阅读了这篇文章,我仍然怀疑我的解决方案在某处。
我想通过将变量名粘贴在一起来引用变量名。在这种情况下,breaks参数ggplot::scale_x_continuous()
dput(breaks_7)
c("-3\n$0", "-2\n$1", "-1\n$3", "0\n$10", "1\n$33", "2\n$108",
"3\n$351", "-3\n$0", "-2\n$1", "-1\n$4", "0\n$11", "1\n$35",
"2\n$108", "3\n$333", "-3\n$0", "-2\n$1", "-1\n$3", "0\n$8",
"1\n$25", "2\n$79", "3\n$249", "-3\n$0", "-2\n$1", "-1\n$3",
"0\n$8", "1\n$25", "2\n$76", "3\n$234", "-3\n$0", "-2\n$1", "-1\n$4",
"0\n$11", "1\n$32", "2\n$95", "3\n$277", "-3\n$0", "-2\n$1",
"-1\n$4", "0\n$11", "1\n$31", "2\n$92", "3\n$270", "-3\n$1",
"-2\n$2", "-1\n$6", "0\n$19", "1\n$62", "2\n$199", "3\n$638",
"-3\n$1", "-2\n$2", "-1\n$7", "0\n$22", "1\n$70", "2\n$225",
"3\n$727", "-3\n$0", "-2\n$2", "-1\n$6", "0\n$21", "1\n$76",
"2\n$278", "3\n$1,023", "-3\n$1", "-2\n$2", "-1\n$6", "0\n$22",
"1\n$75", "2\n$257", "3\n$879", "-3\n$0", "-2\n$0", "-1\n$2",
"0\n$10", "1\n$42", "2\n$185", "3\n$811", "-3\n$0", "-2\n$1",
"-1\n$2", "0\n$8", "1\n$34", "2\n$138", "3\n$557")
breaks_7 %>% glimpse
chr [1:84] "-3\n$0" "-2\n$1" "-1\n$3" "0\n$10" "1\n$33" "2\n$108" "3\n$351" "-3\n$0" "-2\n$1" "-1\n$4" "0\n$11" "1\n$35" "2\n$108" "3\n$333" "-3\n$0" "-2\n$1" "-1\n$3" "0\n$8" "1\n$25" "2\n$79" "3\n$249" "-3\n$0" ...
breaks_7是长度为84的chr向量。我想通过将字符串'breaks_'粘贴为数字7来引用breaks_7。 paste0('breaks_', 7)
尝试在控制台中获得预期结果:
chr [1:84] "-3\n$0" "-2\n$1" "-1\n$3" "0\n$10" "1\n$33" "2\n$108" "3\n$351" "-3\n$0" "-2\n$1" "-1\n$4" "0\n$11" "1\n$35" "2\n$108" "3\n$333" "-3\n$0" "-2\n$1" "-1\n$3" "0\n$8" "1\n$25" "2\n$79" "3\n$249" "-3\n$0" ...
尝试过:
!! paste0('breaks_', 7) %>% glimpse
chr "breaks_7"
Error in !paste0("breaks_", 7) %>% glimpse : invalid argument type
尝试过:
!! rlang::sym(paste0('breaks_', 7)) %>% glimpse
symbol breaks_7
Error in !rlang::sym(paste0("breaks_", 7)) %>% glimpse :
invalid argument type
尝试过:
as.symbol(paste0('breaks_', 7)) %>% glimpse
symbol breaks_7
尝试过:
!! as.symbol(paste0('breaks_', 7)) %>% glimpse
symbol breaks_7
Error in !as.symbol(paste0("breaks_", 7)) %>% glimpse :
invalid argument type
如何通过将“ breaks_”和数字7粘贴在一起来瞥见breaks_7?
我认为您只是在寻找get
:
get(paste0("breaks_", 7))
#> [1] "-3\n$0" "-2\n$1" "-1\n$3" "0\n$10" "1\n$33" "2\n$108" "3\n$351"
#> [8] "-3\n$0" "-2\n$1" "-1\n$4" "0\n$11" "1\n$35" "2\n$108" "3\n$333"
#> [15] "-3\n$0" "-2\n$1" "-1\n$3" "0\n$8" "1\n$25" "2\n$79" "3\n$249"
#> [22] "-3\n$0" "-2\n$1" "-1\n$3" "0\n$8" "1\n$25" "2\n$76" "3\n$234"
#> [29] "-3\n$0" "-2\n$1" "-1\n$4" "0\n$11" "1\n$32" "2\n$95" "3\n$277"
#> [36] "-3\n$0" "-2\n$1" "-1\n$4" "0\n$11" "1\n$31" "2\n$92" "3\n$270"
#> [43] "-3\n$1" "-2\n$2" "-1\n$6" "0\n$19" "1\n$62" "2\n$199" "3\n$638"
#> [50] "-3\n$1" "-2\n$2" "-1\n$7" "0\n$22" "1\n$70" "2\n$225" "3\n$727"
#> [57] "-3\n$0" "-2\n$2" "-1\n$6" "0\n$21" "1\n$76" "2\n$278" "3\n$1,023"
#> [64] "-3\n$1" "-2\n$2" "-1\n$6" "0\n$22" "1\n$75" "2\n$257" "3\n$879"
#> [71] "-3\n$0" "-2\n$0" "-1\n$2" "0\n$10" "1\n$42" "2\n$185" "3\n$811"
#> [78] "-3\n$0" "-2\n$1" "-1\n$2" "0\n$8" "1\n$34" "2\n$138" "3\n$557"
本文收集自互联网,转载请注明来源。
如有侵权,请联系[email protected] 删除。
我来说两句