Skip to content
Prev 351599 / 398498 Next
Original Raw

if else statement for rain data to define zero for dry and one to wet

roslinazairimah zakaria 
Dear r-users,

I have a set of rain data:

X1950 X1951 X1952 X1953 X1954 X1955 X1956 X1957 X1958 X1959 X1960 X1961
X1962

1   0.0   0.0  14.3   0.0  13.5  13.2   4.0     0   3.3     0     0   0.0


2   0.0   0.0  21.9   0.0  10.9   6.6   2.1     0   0.0     0     0   0.0


3  25.3   6.7  18.6   0.8   2.3   0.0   8.0     0   0.0     0     0  11.0


4  12.7   3.4  37.2   0.9   8.4   0.0   5.8     0   0.0     0     0   5.5


5   0.0   0.0  58.3   3.6  21.1   4.2   3.0     0   0.0     0     0  15.9


I would like to go through each column and define each cell with value
greater than 0.1 mm will be 1 and else zero. Hence I would like to attach
the rain data and the category side by side:


1950   state

1 0.0    0

2 0.0    0

3 25.3   1

4 12.7   1

5 0.0    0


...


This is my code:


wet_dry  <- function(dt)

{ cl   <- length(dt)

  tresh  <- 0.1


  for (i in 1:cl)

  {  xi <- dt[,i]

     if (xi < tresh ) 0 else 1

  }

dd <- cbind(dt,xi)

dd

}


wet_dry(dt)


Results:
X1950 X1951 X1952 X1953 X1954 X1955 X1956 X1957 X1958 X1959 X1960 X1961
X1962 X1963 X1964 X1965 X1966 X1967 X1968 X1969 X1970 X1971 X1972 X1973
X1974 X1975 X1976 X1977

1    0.0   0.0  14.3   0.0  13.5  13.2   4.0   0.0   3.3   0.0   0.0   0.0
  4.2   0.0   2.2   0.0   4.4   5.1     0   7.2   0.0   0.0   0.0   5.1
0   0.0     0   0.3

2    0.0   0.0  21.9   0.0  10.9   6.6   2.1   0.0   0.0   0.0   0.0   0.0
  8.4   0.0   4.0   0.0   4.9   0.7     0   0.0   0.0   0.0   0.0   5.4
0   3.3     0   0.3

3   25.3   6.7  18.6   0.8   2.3   0.0   8.0   0.0   0.0   0.0   0.0  11.0
  4.2   0.0   2.0   0.0  14.2  17.1     0   0.0   0.0   0.0   0.0   2.1
0   1.7     0   4.4

4   12.7   3.4  37.2   0.9   8.4   0.0   5.8   0.0   0.0   0.0   0.0   5.5
  0.0   0.0   5.4   0.0   6.4  14.9     0  10.1   2.9 143.4   0.0   6.1
0   0.0     0  33.5


It does not work and give me the original data.  Why is that?


Thank you so much for your help.

Thread (8 messages)

roslinazairimah zakaria if else statement for rain data to define zero for dry and one to wet Jun 5 PIKAL Petr if else statement for rain data to define zero for dry and one to wet Jun 5 John Kane if else statement for rain data to define zero for dry and one to wet Jun 5 Jim Lemon if else statement for rain data to define zero for dry and one to wet Jun 6 roslinazairimah zakaria if else statement for rain data to define zero for dry and one to wet Jun 6 Dennis Murphy if else statement for rain data to define zero for dry and one to wet Jun 6 William Dunlap if else statement for rain data to define zero for dry and one to wet Jun 6 roslinazairimah zakaria if else statement for rain data to define zero for dry and one to wet Jun 7