Extract field year / quarter effect based on date

1, The right person

By year - month - Japan , It's a year + season

• • 
    
• According to the year of the date , It's a year
• According to the month of the date , Extraction season
• Combine the two
  • 
    

2. Example

Log in and copy

       

        > head(test)
        
  ID Ceding_dat
        
1  1 2015-07-10
        
2  2 2015-07-10
        
3  3 2015-08-12
        
4  4 2016-02-28
        
5  5 2016-04-26
        
6  6 2016-04-26
       
       

        
1.
        
2.
        
3.
        
4.
        
5.
        
6.
        
7.
        
8.
       

Data pair ​​Ceding_dat​​, Extract year and season ：

How to extract seasons , month , Use lubridate package :

Log in and copy

       

        test$CNJ = paste0(year(test$Ceding_dat),quarter(test$Ceding_dat))
        
head(test)
       
       

        
1.
        
2.
       

result ：

Log in and copy

       

        > head(test)
        
  ID Ceding_dat   CNJ
        
1  1 2015-07-10 20153
        
2  2 2015-07-10 20153
        
3  3 2015-08-12 20153
        
4  4 2016-02-28 20161
        
5  5 2016-04-26 20162
        
6  6 2016-04-26 20162
       
       

        
1.
        
2.
        
3.
        
4.
        
5.
        
6.
        
7.
        
8.
       

3. Code interpretation

Use R package ​​lubridate·​​​, Year of extraction , Extraction season , Use ​​paste0​​ Combine the two , And then copy it to test, Name it CNJ.

wish you success ！