data = read.table(file.choose(),header = TRUE)
plot(data[2:3],main="Pendapatan dan Pengeluaran per-Bulan, dalam juataan Rupiah")