fork download 
  1. x<-c(201401,201402, 201403, 201404, 201405, 201406, 201407, 201408, 201409, 201410, 201411,
  2.   201412, 201501, 201502, 201503, 201504, 201505, 201506, 201507, 201508, 201509, 201510,
  3.   201511, 201512, 201601, 201602, 201603, 201604)
  4.  
  5. y<-c(16.8, 16.5 ,18.9, 22.5, 25.2 ,28.0 ,30.5 ,30.2, 29.7 ,24.7 ,22.3, 16.5 ,16.7, 17.3, 18.9, 22.7,
  6. 26.1 ,30.0 ,30.0 ,28.6 ,27.4, 25.2 ,23.5 ,18.9 ,16.2, 15.5, 17.5 ,24.0)
  7. plot(x,y,type="o",
  8.      lwd=2,
  9.      col=2,
  10.      xlab="年月",
  11.      ylab="氣溫")
Success #stdin #stdout #stderr 0.53s 79360KB
comments (?)
stdin 
Standard input is empty
stdout 
Standard output is empty
stderr 
There were 24 warnings (use warnings() to see them)
https://ideone.com/fuQFUL
language:
R (R 3.5.2)
created:
9 years ago
visibility:
public

Share or Embed source code

Discover > Sphere Engine API

The brand new service which powers Ideone!

Discover > IDE Widget

Widget for compiling and running the source code in a web browser!