"R 데이터프레임 특정기간 추출"의 두 판 사이의 차이

2021년 4월 8일 (목) 23:15 기준 최신판

1 개요[ | ]

R 데이터프레임 특정기간 추출

2 날짜(Date)[ | ]

df <- read.table( header=T, sep=",", stringsAsFactors=FALSE, text="
date,fruit,ea
2019-05-30,apple,1
2019-06-01,apple,1
2019-06-03,banana, 2
2019-06-05,apple,3
2019-06-06,banana,4
")
df$date <- as.Date(df$date)
newdf <- df["2019-06-01" <= df$date & df$date <= "2019-06-05",]
newdf

3 날짜시간(POSIXct)[ | ]

df <- read.table( header=T, sep=",", stringsAsFactors=FALSE, text="
dt,fruit,ea
2019-05-30 13:00,apple,1
2019-06-01 13:00,apple,1
2019-06-03 13:00,banana, 2
2019-06-05 13:00,apple,3
2019-06-06 13:00,banana,4
")
df$dt <- as.POSIXct(df$dt)
newdf <- df["2019-06-01 12:00" <= df$dt & df$dt < "2019-06-05 12:00",]
newdf

4 같이 보기[ | ]

@@ 3번째 줄: / 3번째 줄: @@
 ==날짜(Date)==
-<source lang='r'>
+<syntaxhighlight lang='r' run>
 df <- read.table( header=T, sep=",", stringsAsFactors=FALSE, text="
 date,fruit,ea
@@ 13번째 줄: / 13번째 줄: @@
 ")
 df$date <- as.Date(df$date)
-df <- df[df$date >= "2019-06-01" & df$date <= "2019-06-05",]
+newdf <- df["2019-06-01" <= df$date & df$date <= "2019-06-05",]
-df
+newdf
-##         date  fruit ea
+</syntaxhighlight>
-## 2 2019-06-01  apple  1
-## 3 2019-06-03 banana  2
-## 4 2019-06-05  apple  3
-</source>
 ==날짜시간(POSIXct)==
-<source lang='r'>
+<syntaxhighlight lang='r' run>
 df <- read.table( header=T, sep=",", stringsAsFactors=FALSE, text="
 dt,fruit,ea
@@ 32번째 줄: / 28번째 줄: @@
 ")
 df$dt <- as.POSIXct(df$dt)
-df <- df[df$dt >= "2019-06-01 12:00" & df$dt < "2019-06-05 12:00",]
+newdf <- df["2019-06-01 12:00" <= df$dt & df$dt < "2019-06-05 12:00",]
-df
+newdf
-##                    dt  fruit ea
+</syntaxhighlight>
-## 2 2019-06-01 13:00:00  apple  1
-## 3 2019-06-03 13:00:00 banana  2
-</source>
 ==같이 보기==
 * [[R as.Date()]]
 * [[R 데이터 전처리]]
+* [[R 데이터프레임 특정날짜 이전 행 제거]]
+* [[R 데이터프레임 특정일시 이전 행 제거]]
 [[분류: R 데이터 전처리]]