ggplot - Plotting several sin functions on one graph [duplicate]

Question

I want to show graphically how the summation of two different sin curves looks like. So, I am trying to make a single graph that shows two different sin function and their sum. So, three curves on one graph.

How can I do it with ggplot layers?

I am defing two sin functions (y and z)

x <- seq(0, 16*pi, 0.01)
y <- 2*sin(3*(x-1))
z <- sin(x)

summing up the two curves:

t <- y + z

I can see the three separately with:

plot(x,y,type="l")
plot(x,z,type="l")
plot(x,t,type="l")

But how can I plot the three functions?

I tried this but it does not work

ggplot(x,
       qplot(y,x,geom="path", xlab="time", ylab="Sine wave") +
       qplot(z,x,geom="path", xlab="time", ylab="Sine wave"))

Maurits Evers · Accepted Answer · 2020-02-11 22:40:55Z

2

Store everything in a data.frame, reshape from wide to long, and plot:

library(tidyverse)
data.frame(x = x, y = y, z = z, t = y + z) %>%
    pivot_longer(-x) %>%
    ggplot(aes(x, value, colour = name)) +
    geom_line()

Sample data

x <- seq(0, 16*pi, 0.01)
y <- 2*sin(3*(x-1))
z <- sin(x)

answered Feb 11, 2020 at 22:40

Maurits Evers

51k4 gold badges53 silver badges75 bronze badges

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

2 Comments

Ron Over a year ago

Thanks, but I get an error: could not find function "pivot_longer". I have already tried with tidyr, dplyr, tidyverse, data.table and it does work. How to make it work? THANKS

Maurits Evers Over a year ago

@RonSlavaGrodko You need to update tidyr; pivot_longer was introduced in version 1.0.0 (the current CRAN version is 1.0.2) and replaced gather. The old version would be gather(name, value, -x).

Collectives™ on Stack Overflow

ggplot - Plotting several sin functions on one graph [duplicate]

1 Answer 1

Sample data

2 Comments

Linked

Hot Network Questions

Collectives™ on Stack Overflow

1 Answer 1

Sample data

2 Comments

Linked

Related