рассчитать среднее значение из двух столбцов, а затем рассчитать среднее дневное значение к среднегодовому - PullRequest
0 голосов
/ 29 января 2019

У меня дневная минимальная температура, максимальная температура, минимальная точка росы и максимальная точка росы.Эти данные содержат NaN, я хочу вычислить среднее значение между MaxdewPoint и средней точкой росы, но я не хочу принимать среднее значение, если есть NaN.В моем случае мне нужна средняя температура точки росы между среднесуточной температурой точки росы 1948 и 2009 гг. У меня есть данные с 1948 по 2018 гг. Затем я хочу получить среднесуточное значение среднегодового значения.

Мои данные

Station Date    Month  Day Year    MaxTemp MinTemp MaxDewPoint MinDewPoint
ORD     1/1/1948    1   1   1948    35.6    26.6    34.16         -27.4
ORD     1/2/1948    1   2   1948    -2      -16     -16.96       -27.04
ORD     1/3/1948    1   3   1948    -4      -26     -12            -26
ORD     1/4/1948    1   4   1948    -5      -26     -15             -26
ORD     1/5/1948    1   5   1948    8       -25     3               NaN
ORD     1/6/1948    1   6   1948    -11     -25     -24            -25
ORD     1/7/1948    1   7   1948    1       -23     NaN            -23
ORD     1/8/1948    1   8   1948    1       -22     -9              NaN
ORD     1/9/1948    1   9   1948    NaN     -22     -5             -22
ORD     1/10/1948   1   10  1948    10      NaN     -2              -22
ORD     1/11/1948   1   11  1948    -11     -21    -23              -21
ORD     1/12/1948   1   12  1948    3       -12     -7.96        -20.92
ORD     1/13/1948   1   13  1948    6.98    -7.6    -7.6         -20.2
ORD     1/14/1948   1   14  1948    3.92    -9.4    -11.2        NaN
ORD     1/15/1948   1   15  1948    6        -7    -5.98         NaN
ORD     1/16/1948   1   16  1948    3       -11     -7.96       -20.02

мой код

#Calculate Mean temperature and dew point
MeanTMP <- dframe %>% 
    mutate(MeanTMP=rowMeans(cbind(dframe$Max.Temp,dframe$Min.Temp),na.rm=TRUE))

#In my data, Minimum Dew point had more than 12 percent of missing data that is from 
# 2010 to 2018) so i want to exclude these years in mean but i dont know
# how do i do this?
MeanDTMP <- dframe %>% 
    mutate(MeanDTMP=rowMeans(cbind(dframe$Max.Dew.Point, dframe$Min.Dew.Point), 
           na.rm=TRUE)) 
Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...