> head(result0_1)

  frame id  spd_kph

1     1  1       NA

2     4  2 91.70362

3     5  2 24.62675

4     6  2 19.83097

5     7  2 19.22233

6     8  2 19.18941

> filter(result0_1, frame==data_set2[i,1])

  frame   id  spd_kph

1  6185 1069 21.25521

2  6185 1070 31.21252

3  6185 1071 13.24674


filter 문에 반복문을 사용할 경우, 조건에는 [ i , ] 과 같은 조건을 넣으면 안되며, 넣지 않아줘도 된다. 

알아서 반복적으로 필터링해줌 

R studio 한글 깨질떄


http://rfriend.tistory.com/10


기본 코드


http://pubdata.tistory.com/24

> abc <- 1:10

> efg <- 10:19

> ag <- cbind(abc,efg)


> mutate(ag, efg2 = efg + 100)
Error in UseMethod("mutate_") : 
  no applicable method for 'mutate_' applied to an object of class "c('matrix', 'integer', 'numeric')"



> ag <- data.frame(ag)

> mutate(ag, efg2 = efg + 100)

   abc efg efg2

1    1  10  110

2    2  11  111

3    3  12  112

4    4  13  113

5    5  14  114

6    6  15  115

7    7  16  116

8    8  17  117

9    9  18  118

10  10  19  119


mutate 함수는 data.frame으로 만든 데이터로 돌려야 돌아가는 것 같음. 




원 코드

#test====

abc <- 1:10

efg <- 10:19

ag <- cbind(abc,efg)


ag <- data.frame(ag)


mutate(ag, efg2 = efg + 100)







데이터 인덱싱


행과 열의 순서 바꾸기




> head(data_r)

  frame id   x   y dist_vec dist_meter spd_point  spd_mps spd_kph time

1     1  1 360 200     0.00     0.0000     0.000  0.00000  0.0000  0.1

2     2  2 137 117   236.93     1.5874     0.000  0.00000  0.0000  0.2

3     3  2 138 119     2.09     0.0140  2348.334 15.73384 56.6418  0.3

4     4  2 137 121     2.00     0.0134     0.962  0.00645  0.0232  0.4



> data_r <- data_r[c(10,1,2,3,4,5,6,7,8,9)]

> head(data_r)

  time frame id   x   y dist_vec dist_meter spd_point  spd_mps spd_kph

1  0.1     1  1 360 200     0.00     0.0000     0.000  0.00000  0.0000

2  0.2     2  2 137 117   236.93     1.5874     0.000  0.00000  0.0000

3  0.3     3  2 138 119     2.09     0.0140  2348.334 15.73384 56.6418



United Airline

2018.01.05

ICN - SFO - BOS

'Air' 카테고리의 다른 글

2017 Manila, 마닐라 국제공항  (0) 2017.11.01
2016, AE231 만다린항공 탑승기  (0) 2017.08.27
필리핀 항공 마일리지 적립!  (0) 2016.12.01

> getwd()


> list.files()



CSV file 
data <- read.csv('F:/B Image Processing Tracking/A data operation file/result1_NPH.csv', header = FALSE)


R 파일 경로 

다음과 같이 커서를 놓으면,

R 파일의 경로가 나옴





ctrl + 1 
ctrl + 2 console 


2017 Incheon, 인천 국제공항


필리핀항공 PR469


A333에 3-3-3 배열은 극악입니다...AVOD 도 없어여,,,

2017 Manila, 마닐라 국제공항

제2터미널 필리핀항공


해롱해롱


밤 12시에 마닐라 도착.

05시 30분에 탑승, 마닐라 출발.

비가 오네요. A340타고 다바오행!

'Air' 카테고리의 다른 글

2018.01.05 ICN - SFO - BOS  (0) 2018.01.25
2016, AE231 만다린항공 탑승기  (0) 2017.08.27
필리핀 항공 마일리지 적립!  (0) 2016.12.01


2017 다바오 국제공항 

프란시스코 방고이 


아침 8시에 도착한건 처음입니다!

전세계 레어템 광동체 A340-300를 타고 도착했습니다.


MNL-DVO 노선 덕분에 B747-400도 타고,

A340-300도 타고 정말 고마운 노선입니다. 

'Abroad' 카테고리의 다른 글

2016 Incheon International Airport  (0) 2017.08.27
2016 Incheon, 서울인천 국제공항  (0) 2016.11.06
2016 Taipei, 타오위안 국제공항  (0) 2016.09.03

2016 Incheon Int'l Airport 

AE231

Incheon to Taoyuan

Gate : 105

ERJ 195


비슷한 시간대에 대만으로 떠나는 항공기들이 준비중입니다.

제가타는 만다린항공을 포함해서,

중화, 스쿠트 항공 등등


왜 이리 탑승동만 타러 오면,

맨 끝으로 가는지 알 수 없습니다....ㅜ

싼 게 비지떡이라고 LCC 들은 양 끝단으로 가는건가요...


칼리보로 향하는 저렴한 필리핀항공도 105번 게이트를 이용할 예정이랍니다 ㅜㅜ

'Air' 카테고리의 다른 글

2018.01.05 ICN - SFO - BOS  (0) 2018.01.25
2017 Manila, 마닐라 국제공항  (0) 2017.11.01
필리핀 항공 마일리지 적립!  (0) 2016.12.01

+ Recent posts