Верхний индекс лесного участка R в списке авторов

Я хочу создать лесной участок, и мне нужно поместить ссылку в виде надстрочного индекса в лесном участке.

Я пробовал несколько вещей.

Предположим, это в моем списке авторов в ссылках

   aut<- c("a, 2018", "c, 2018", "v, 2018", "f, 2018", "f, 2017", 
            "f, 2015", "y, 2014","ya, 2014","y, 2014","j, 2013", "j, 2011",
            "j, 2011","h, 2011", "g, 2011","e, 2010","r, 2008","f, 2008",
            "gh, 2007","h, 2006","h, 2005","h, 2004","h, 2003",
            "h, 2002", "g, 2002","f, 2002","f, 2001","f, 2001", "208136/016, 2001", "208136/007, 2001",
            "f, 2000","f, 2000", "g, 1999","g, 1999", "g, 1998",
            "d , 1998","g, 1998","go, 1997","g, 1995","g, 1994",
            "r, 1991","r, 1989","r, 1988","r, 1987","r, 1983",
            "g, 1982","g, 1981","g, 1975","g, 1975")
    ref<-as.character(seq(1:48))

Я пробовал следующее:

aut2<-parse(text(paste(expression(aut,"^",ref))))

Но я получаю сообщение об ошибке:

    Error in parse(text(paste(expression(aut, "^", number)))) : 
  'file' must be a character string or connection
In addition: Warning message:
In xy.coords(x, y, recycle = TRUE, setLab = FALSE) :
  NAs introduced by coercion

Я также пробовал с выражением, но это тоже не сработало.

Может кто-нибудь помочь мне?

Благодарю вас!


r superscript forestplot
person XXXX992    schedule 09.10.2019    source источник
comment
Я нашел решение! Неважно   -  person XXXX992    schedule 09.10.2019
comment
Эй, было бы здорово, если бы вы сами ответили на свой вопрос, чтобы решение, которое вы нашли, помогло другим!   -  person qdread    schedule 09.10.2019

Ответы (1)


arrow_upward
0
arrow_downward

Итак, я нашел решение. Не самый красивый, но он делает свое дело, и у меня не было настроения искать что-то элегантное.

aut<-list(expression("author,2011"^2,.. etc)

Где 2 - ссылка.

Это было больше важно, чтобы найти правильный формат, который мне нужен для объединения вещей в функции лесного участка.

Я надеюсь, что это может помочь и другим :)

person XXXX992    schedule 09.10.2019
comment
aut‹-list(выражение(автор,2011^2),.. и т.д.) *** - person XXXX992; 09.10.2019