2017-07-18 42 views
0

我試圖簡單地將一個圖例添加到我的奈奎斯特圖中,繪製2組數據:1是實驗組(約600分),2是數據框使用傳遞函數計算(〜1000分)將自定義圖例添加到ggplot2中的2個數據集

我需要繪製兩者並標記它們。目前我有他們都繪製好,但當我嘗試使用scale_colour_manual添加標籤沒有標籤出現。另外一種方式來移動這個標籤周圍將不勝感激!代碼如下。

pdf("nyq_2elc.pdf") 

    nq2 <- ggplot() + geom_point(data = treat, aes(treat$V1,treat$V2), color = "red") + 
    geom_point(data = circuit, aes(circuit$realTF,circuit$V2), color = "blue") + 
    xlab("Real Z") + ylab("-Imaginary Z") + 
    scale_colour_manual(name = 'hell0', 
         values =c('red'='red','blue'='blue'), labels = c('Treatment','EQ')) + 
    ggtitle("Nyquist Plot and Equivilent Circuit for 2 Electrode Treatment Setup at 0 Minutes") + 
    xlim(0,700) + ylim(0,700) 


print(nq2) 
dev.off() 

回答

0

Ggplot在最佳狀態下長dataframes,所以我會結合數據集是這樣的:

treat$Cat <- "treat" 
circuit$Cat <- "circuit" 
CombData <- data.frame(rbind(treat, circuit)) 

ggplot(CombData, aes(x=V1, y=V2, col=Cat))+geom_point() 

這應該給你你想要的傳說。

你可能必須改變dataframes treatcircuit,使他們可以合併的列的名稱/訂單,但很難說,因爲你不給我們一個重複的例子。

+0

作品完美!謝謝:D – CHopp

相關問題