val date = SimpleDateFormat("HH:mm").format(Date((1507457400000 / 1000)))
Пересмотреть выражение в r2p[2]
в одну из следующих форм:
expression(italic(P) ~ PVALUE)
expression(italic(P) * PVALUE)
expression(paste(italic(P), PVALUE))
То есть, поместите любой из приведенных выше кодов на место xxxxxx
:
r2p[2] = substitute(xxxxxx, list(PVALUE = format(P, digits = 2)))[2]
Пожалуйста, проверьте ?plotmath
и demo(plotmath)
для деталей.