6
我有以下的數據幀創建的多行文字上標
Data1 <- data.frame(pH = c(8,8.5,6,7.1,9), EC50 = c(20,11,5,25,50))
Data2 <- data.frame(pH = c(7,7.2,6.5,8.2,8.5), EC50 = c(13,15,18,25,19))
使用par
我的一個陰謀創建兩個圖表:
par(mfrow=c(2,1), oma=c(3,3,1,1), mar=c(2,2,3,1), cex.axis=1.3)
plot(x=Data1[,'pH'], y=Data1[,'EC50'])
plot(x=Data2[,'pH'], y=Data2[,'EC50'])
因爲我以前par
,我不能指定在xlab
和ylab
plot
,
因此我使用mtext
。
我想在我的ylab
上寫一個上標,但是,我不知道該怎麼辦,
使用mtext
的時候。
我曾嘗試以下
mtext(expression("Cu^{2+} at EC50"), side=2, line = 4, padj=1, at=30, cex=1.2)
,但似乎無法得到2+
作爲銅上方標。
任何幫助都比歡迎!