How to solve this problem with R Studio?

Soal 1 [Bobot 50]. Buatlah perintah untuk: Membangkitkan vektor i=(1,2,,11,12,1,2,11,12,1,2,,11,12) ' dengan angka 12 muncul 10 kali. Membangkitkan vektor m=(Jan,Feb,, Nov, Dec, Jan,Feb,., Nov,Dec)' dengan Dec muncul 10 kali. 2) Membangkitkan vektor y=(2001,2001,,2001,2002,2002,.,2020,2020) ' dengan masingmasing tahun muncul 12 kali. 1) Membangkitkan vektor t=(1,2,,T) ' dengan T adalah panjang vektor i. ) Bangkitkan data yang mengikuti proses berikut dan simpan ke dalam vektor Yt. Yt=100+10t+50sin(122t)+t, dengan tN(0,4) dan t sesuai elemen vektor t. Gabungkan vektor i,m,y, dan t menjadi matriks atau dataframe dengan nama data dan nama kolom "IndexMonth", "Month", "Year", "Time", dan "Yt"! g) Buatlah line plot berwarna merah, tebal garis adalah 3pt, label pada sumbu vertikal adalah Y dan label sumbu horisontal adalah Time! a) Dapatkan taksiran model regresi linier, baik dengan intercept maupun tanpa intercept, untuk "Yt" dan "Time"! Tambahkan garis taksiran model regresi linier pada bagian 1.h) pada plot di bagian 1.g)! Tambahkan perintah untuk menyimpan file gambar pada bagian 1.i)