How to draw a line plot in ggplot using a data.frame file?

Question

Thank you for reading. I find that I am unable to draw line plot from my existing data as below:

a=structure(list(ID = structure(1:3, .Names = c("V2", "V3", "V4"
), .Label = c(" day1", " day2", " day3"), class = "factor"), 
    Protein1 = structure(c(3L, 1L, 2L), .Names = c("V2", 
    "V3", "V4"), .Label = c("-0.651129553", "-1.613977035", "-1.915631511"
    ), class = "factor"), Protein2 = structure(c(3L, 
    1L, 2L), .Names = c("V2", "V3", "V4"), .Label = c("-1.438858662", 
    "-2.16361761", "-2.427593862"), class = "factor")), .Names = c("ID", 
"Protein1", "Protein2"), row.names = c("V2", 
"V3", "V4"), class = "data.frame")

What I need is to draw a graph as below:

I have tried the following codes but the results are not ok;

qplot(ID, Protein1, data=a, colour=ID, geom="line")

Also:

a1<-melt(a, id.vars="ID")
ggplot(a1,aes(ID,value))+ geom_line()+geom_point()

So many thanks for your care.

Johan · Accepted Answer · 2023-10-04 07:38:38Z

1

First, you have to modify the structure of your data.frame : Protein1 & Protein2 should be numeric and not factors.

a$Protein1 = as.numeric(as.character(a$Protein1))
a$Protein2 = as.numeric(as.character(a$Protein2))

If you only want to plot "Protein1", you do not need to use melt first.

ggplot(a, aes(x = ID, y = Protein1)) 
  + geom_point() 
  + geom_line(aes(group = 1)) 
  + ylim(-3,3)

group = 1 permits connecting points with geom_line() : source

Now, if you want to see Protein1 & Protein2 on the same plot, you can use melt :

a1<-melt(a, id.vars="ID")
ggplot(a1, aes(x = ID, y = value, group = variable, color = variable)) 
  + geom_point() 
  + geom_line() 
  + ylim(-3,3)

edited Oct 4, 2023 at 7:38

Johan

77.4k28 gold badges204 silver badges346 bronze badges

answered Apr 18, 2016 at 7:13

bVa

3,9681 gold badge16 silver badges22 bronze badges

Sign up to request clarification or add additional context in comments.

4 Comments

Sadegh Over a year ago

Thank you very much. Could you please help me to add the legends on the lines within the plot?

bVa Over a year ago

If you only want to move the legend (bottom, right), use : + theme(legend.justification=c(1,0), legend.position=c(1,0)) If you want to only write the labels : + geom_text(data = a1[a1$ID == " day3",], aes(label = variable), vjust = -1, hjust = 0). Be careful, I saw that the levels of ID are " day1", with a blank character.

Sadegh Over a year ago

perfect. Thank you. Just one more point. Do you know how is it possible to add a label per line instead of a label per point? one "Protein1" word for red line and one "Protein2" word for blue one.

bVa Over a year ago

You have to explicit the subset of the date, with only one point (for example " day3", or " day1", ...) for each "protein": geom_text(data = a1[a1$ID == " day3",], aes(label = variable), vjust = -1, hjust = 0)

Collectives™ on Stack Overflow

How to draw a line plot in ggplot using a data.frame file?

1 Answer 1

4 Comments

Your Answer

Linked

Hot Network Questions

Collectives™ on Stack Overflow

1 Answer 1

4 Comments

Your Answer

Sign up or log in

Post as a guest

Linked

Related