Bagaimana cara mengubah angka menjadi tanggal di r

Seringkali Anda perlu mengonversi angka ke format tanggal di R. Cara termudah untuk melakukannya adalah dengan menggunakan paket lubridate , yang memiliki beberapa fungsi berguna untuk menangani tanggal di R.

Tutorial ini memberikan beberapa contoh bagaimana menggunakan fungsi-fungsi ini dalam praktik.

Contoh 1: Ubah Bilangan Bulat menjadi Tanggal

Kode berikut menunjukkan cara mengonversi kolom nilai integer dalam bingkai data ke format tanggal menggunakan fungsi ymd() :

 library (lubridate)

#create data frame
df <- data.frame(date = c(20201022, 20201023, 20201026, 20201027, 20201028),
                 sales = c(4, 7, 8, 9, 12))

#convert date column from numeric to year-month-date format
df$date <- ymd (df$date)

#view data frame
df

        dirty date
1 2020-10-22 4
2 2020-10-23 7
3 2020-10-26 8
4 2020-10-27 9
5 2020-10-28 12

#view class of date column
class (df$date)

[1] “Date”

Perhatikan bahwa paket lubridate memiliki beberapa fungsi untuk menangani format tanggal yang berbeda.

Misalnya, berikut ini menunjukkan cara mengonversi kolom nilai integer dalam bingkai data ke format tanggal menggunakan fungsi ydm() :

 library (lubridate)

#create data frame
df <- data.frame(date = c(20202210, 20202310, 20202610, 20202710, 20202810),
                 sales = c(4, 7, 8, 9, 12))

#convert date column from numeric to year-month-date format
df$date <- ydm (df$date)

#view data frame
df

        dirty date
1 2020-10-22 4
2 2020-10-23 7
3 2020-10-26 8
4 2020-10-27 9
5 2020-10-28 12

#view class of date column
class (df$date)

[1] “Date”

Contoh 2: Ubah bulan dan tahun menjadi tanggal

Kode berikut menunjukkan cara mengonversi kolom nilai numerik yang mewakili jumlah bulan mulai 1 Januari 2010 ke format tanggal menggunakan fungsi bulan() :

 library (lubridate)

#create data frame
df <- data.frame(date = c(11, 15, 18, 22, 24),
                 sales = c(4, 7, 8, 9, 12))

#convert date column from numeric to year-month-date format
df$date <- as. Date (' 2010-01-01 ') + months (df$date)

#view data frame
df

        dirty date
1 2010-12-01 4
2 2011-04-01 7
3 2011-07-01 8
4 2011-11-01 9
5 2012-01-01 12

#view class of date column
class (df$date)

[1] “Date”

Dan kode berikut menunjukkan cara mengubah kolom nilai numerik yang mewakili jumlah tahun sejak 1 Januari 2010 ke format tanggal menggunakan fungsi Years() :

 library (lubridate)

#create data frame
df <- data.frame(date = c(11, 15, 18, 22, 24),
                 sales = c(4, 7, 8, 9, 12))

#convert date column from numeric to year-month-date format
df$date <- as. Date (' 2010-01-01 ') + years (df$date)

#view data frame
df

        dirty dates
1 2021-01-01 4
2 2025-01-01 7
3 2028-01-01 8
4 2032-01-01 9
5 2034-01-01 12

#view class of date column
class (df$date)

[1] “Date”

Bonus: Lihat lembar contekan ini untuk lebih memahami fitur-fitur yang tersedia dalam paket Lubridate.