A: cara mendapatkan hari pertama atau terakhir setiap bulan menggunakan lubridate

Anda dapat menggunakan metode berikut untuk mendapatkan hari pertama atau terakhir setiap bulan untuk suatu tanggal di R menggunakan fungsi dalam paket lubridate :

Metode 1: Dapatkan hari pertama setiap bulan

 library (lubridate)

df$first_day <- floor_date(ymd(df$date), ' month ')

Metode 2: Dapatkan hari terakhir setiap bulan

 library (lubridate)

df$last_day <- ceiling_date(ymd(df$date), ' month ') - days( 1 )

Contoh berikut menunjukkan cara menggunakan setiap metode dalam praktik dengan kerangka data berikut:

 #create data frame
df <- data. frame (date=c('2022-01-05', '2022-02-18', '2022-03-21',
                        '2022-09-15', '2022-10-30', '2022-12-25'),
                 sales=c(14, 29, 25, 23, 39, 46))

#view data frame
df

        dirty date
1 2022-01-05 14
2 2022-02-18 29
3 2022-03-21 25
4 2022-09-15 23
5 2022-10-30 39
6 2022-12-25 46

Contoh 1: Dapatkan hari pertama setiap bulan menggunakan Pelumas

Kode berikut menunjukkan cara menggunakan fungsi floor_date() paket lubridate untuk mendapatkan hari pertama setiap bulan untuk setiap nilai di kolom tanggal :

 #add new column that contains first day of month
df$first_day <- floor_date(ymd(df$date), ' month ')

#view updated data frame
df

        date sales first_day
1 2022-01-05 14 2022-01-01
2 2022-02-18 29 2022-02-01
3 2022-03-21 25 2022-03-01
4 2022-09-15 23 2022-09-01
5 2022-10-30 39 2022-10-01
6 2022-12-25 46 2022-12-01

Perhatikan bahwa nilai di kolom hari_pertama yang baru berisi hari pertama setiap bulan untuk setiap nilai di kolom tanggal .

Catatan : Kami menggunakan fungsi ymd() untuk terlebih dahulu mengonversi string di kolom tanggal ke format tanggal yang dapat dikenali.

Contoh 2: Dapatkan hari terakhir setiap bulan menggunakan Lubridate

Kode berikut menunjukkan cara menggunakan fungsi Plafon_date() paket lubridate untuk mendapatkan hari terakhir setiap bulan untuk setiap nilai di kolom tanggal :

 #add new column that contains last day of month
df$last_day <- ceiling_date(ymd(df$date), ' month ') - days( 1 )

#view updated data frame
df

        date sales last_day
1 2022-01-05 14 2022-01-31
2 2022-02-18 29 2022-02-28
3 2022-03-21 25 2022-03-31
4 2022-09-15 23 2022-09-30
5 2022-10-30 39 2022-10-31
6 2022-12-25 46 2022-12-3122-12-01

Perhatikan bahwa nilai di kolom hari_akhir yang baru berisi hari terakhir pada bulan tersebut untuk setiap nilai di kolom tanggal .

Lihat halaman dokumentasi Lubridasi untuk opsi pemformatan tanggal selengkapnya.

Sumber daya tambahan

Tutorial berikut menjelaskan cara melakukan tugas umum lainnya di R:

Bagaimana cara mengubah tanggal menjadi angka di R
Cara mengekstrak bulan dari tanggal di R
Cara menambah dan mengurangi bulan ke tanggal di R