Displaying 4 results from an estimated 4 matches for "604100".
Did you mean:
104100
2017 Jun 23
2
Help: ifelse selection for x,y coordinates
...nate," ")
+ xy<-as.data.frame(list(x,y))
+ names(xy)<-c("x","y")
+ return(xy)
+ }
> kk(x.Koordinate, y.Koordinate, data=data)
x y
1
2
3
4
5
6 205550
7 205550 604100
8
9 205600 604150
10 205600 604100
Best regards,
C.
Gesendet von Mail f?r Windows 10
Von: Jim Lemon
Gesendet: vendredi, 23 juin 2017 05:28
An: C?line L?scher
Cc: r-help at r-project.org
Betreff: Re: [R] Help: ifelse selection for x,y coordinates
Hi Celine,
Perhaps if you modify...
2017 Jun 22
2
Help: ifelse selection for x,y coordinates
...Koordinate,0)
+ y<-ifelse(data$y.Koordinate>coordy-51 & data$G>15,data$y.Koordinate,0)
+ return(c(x,y))
+ }
> kk(data$x.Koordinate, data$y.Koordinate)
[1] 0 0 0 0 0 205550 205550 0 205600 205600 0 0 0 0 0 0 0
[18] 604100 0 604150 604100 0
The problem here is that we can not clearly see the difference between the coordinates for x and the ones for y.
Then I tried?this?:
> kk<- function(x, y)
+ {
+ coordx<-data$x.Koordinate[data$G==24]
+ coordy<-data$y.Koordinate[data$G==24]
+ x <-...
2017 Jun 23
0
Help: ifelse selection for x,y coordinates
...")
+ y<-ifelse(data$y.Koordinate>coordy-51 & data$G>15,data$y.Koordinate," ")
+ xy<-as.data.frame(list(x,y))
+ names(xy)<-c("x","y")
+ return(xy)
+ }
kk(x.Koordinate, y.Koordinate, data=data)
x y
1
2
3
4
5
6 205550
7 205550 604100
8
9 205600 604150
10 205600 604100
Best regards,
C.
Gesendet von Mail f?r Windows 10
Von: Jim Lemon
Gesendet: vendredi, 23 juin 2017 05:28
An: C?line L?scher
Cc: r-help at r-project.org<mailto:r-help at r-project.org>
Betreff: Re: [R] Help: ifelse selection for x,y coordinates
Hi Celine...
2017 Jun 23
0
Help: ifelse selection for x,y coordinates
...ifelse(data$y.Koordinate>coordy-51 & data$G>15,data$y.Koordinate,0)
> + return(c(x,y))
> + }
>> kk(data$x.Koordinate, data$y.Koordinate)
> [1] 0 0 0 0 0 205550 205550 0 205600 205600 0 0 0 0 0 0 0
> [18] 604100 0 604150 604100 0
>
> The problem here is that we can not clearly see the difference between the coordinates for x and the ones for y.
>
> Then I tried this :
>> kk<- function(x, y)
> + {
> + coordx<-data$x.Koordinate[data$G==24]
> + coordy<-data$y....