Data

a <- c(1, 2, 3, 4, 5) 
a 

## [1] 1 2 3 4 5

b <- c(1, 2, 3, 4, 5) 
b 

## [1] 1 2 3 4 5

Plot1

plot(a,b) 

Plot 2

plot(a,b, type="b", main="Ventas Totales", xlab="Semana", ylab="M USD")

Plot 3

plot(a,b, type="c", main="Ventas Totales", xlab="Semana", ylab="M USD")

Plot 4

plot(a,b, type="l", main="Ventas Totales", xlab="Semana", ylab="M USD")