a <- 8

b <- 4:59

a + b

print('Hello world! Love, R in Jupyter.')

f2 <- function() stop('deep error')
throw <- function() f2()

'this line is run / displayed'
throw()
'this line is not run / displayed'

x <- seq(0, 2*pi, length.out=50)
plot(x, sin(x))