Less elegant ((+/) (,,:^:(1=#@$)) -/) i.2 5 5 7 9 11 13 _5 _5 _5 _5 _5
R.E. Boss > -----Original Message----- > From: [email protected] [mailto:programming- > [email protected]] On Behalf Of R.E. Boss > Sent: dinsdag 27 januari 2015 15:10 > To: [email protected] > Subject: Re: [Jprogramming] Behead along all axes --> increase dimension > > Another solution is > > ((+/) ,&.< -/) i.2 5 > 5 7 9 11 13 > _5 _5 _5 _5 _5 > > But compare the following > > (+/~; ,/~; +"0 _~; ,"0 _~) i.5 > +---------+-------------------+---------+-----------+ > |0 1 2 3 4|0 1 2 3 4 0 1 2 3 4|0 1 2 3 4|0 0 1 2 3 4| > |1 2 3 4 5| |1 2 3 4 5|1 0 1 2 3 4| > |2 3 4 5 6| |2 3 4 5 6|2 0 1 2 3 4| > |3 4 5 6 7| |3 4 5 6 7|3 0 1 2 3 4| > |4 5 6 7 8| |4 5 6 7 8|4 0 1 2 3 4| > +---------+-------------------+---------+-----------+ > > > R.E. Boss > > > > -----Original Message----- > > From: [email protected] > [mailto:programming- > > [email protected]] On Behalf Of Ben Gorte - CITG > > Sent: dinsdag 27 januari 2015 15:02 > > To: [email protected] > > Subject: Re: [Jprogramming] Behead along all axes --> increase dimension > > > > Well, for compensation I can show you one of my blind spots. > > > > A simple function f like > > f =. 3 5&* > > behaves as: > > f 4 9 > > 12 45 > > f i. 2 5 > > 0 3 6 9 12 > > 25 30 35 40 45 > > and I like that. > > > > But, for example, > > g =: (+/) , -/ > > behaves differently: > > g 4 9 > > 13 _5 > > g i. 2 5 > > 5 7 9 11 13 _5 _5 _5 _5 _5 > > To get f's behaviour, in terms of output shapes, I use: > > g =: |: @: ((+/) ,. -/) > > Now > > g 4 9 > > 13 _5 > > g i. 2 5 > > 5 7 9 11 13 > > _5 _5 _5 _5 _5 > > > > But somehow this doesn't feel right. What am I missing? > > > > Ben > > ________________________________________ > > From: [email protected] [programming- > > [email protected]] on behalf of R.E. Boss > > [[email protected]] > > Sent: Tuesday, January 27, 2015 14:24 > > To: [email protected] > > Subject: Re: [Jprogramming] Behead along all axes > > > > I feel embarrassed. > > Thnx. > > > > > > R.E. Boss > > > > > > > -----Original Message----- > > > From: [email protected] > > [mailto:programming- > > > [email protected]] On Behalf Of Ben Gorte - CITG > > > Sent: dinsdag 27 januari 2015 13:39 > > > To: [email protected] > > > Subject: Re: [Jprogramming] Behead along all axes > > > > > > Why not > > > <"(2) 1 1 1 1 }. i.3+i.4 > > > ? > > > (or am I missing something?) > > > > > > Ben > > > ________________________________________ > > > From: [email protected] [programming- > > > [email protected]] on behalf of R.E. Boss > > > [[email protected]] > > > Sent: Tuesday, January 27, 2015 12:48 > > > To: [email protected] > > > Subject: [Jprogramming] Behead along all axes > > > > > > My solution is ( <"2 is for presentation reasons) > > > > > > <"2 ({~[:< [:}.L:0 [:<@i."0 $) i.3+i.4 > > > +-------------------+-------------------+-------------------+ > > > |157 158 159 160 161|187 188 189 190 191|217 218 219 220 221| > > > |163 164 165 166 167|193 194 195 196 197|223 224 225 226 227| > > > |169 170 171 172 173|199 200 201 202 203|229 230 231 232 233| > > > |175 176 177 178 179|205 206 207 208 209|235 236 237 238 239| > > > +-------------------+-------------------+-------------------+ > > > |277 278 279 280 281|307 308 309 310 311|337 338 339 340 341| > > > |283 284 285 286 287|313 314 315 316 317|343 344 345 346 347| > > > |289 290 291 292 293|319 320 321 322 323|349 350 351 352 353| > > > |295 296 297 298 299|325 326 327 328 329|355 356 357 358 359| > > > +-------------------+-------------------+-------------------+ > > > > > > Any elegant alternatives? > > > > > > > > > R.E. Boss > > > > > > > > > ---------------------------------------------------------------------- > > > For information about J forums see > > http://www.jsoftware.com/forums.htm > > > ---------------------------------------------------------------------- > > > For information about J forums see > > http://www.jsoftware.com/forums.htm > > ---------------------------------------------------------------------- > > For information about J forums see > http://www.jsoftware.com/forums.htm > > ---------------------------------------------------------------------- > > For information about J forums see > http://www.jsoftware.com/forums.htm > ---------------------------------------------------------------------- > For information about J forums see http://www.jsoftware.com/forums.htm ---------------------------------------------------------------------- For information about J forums see http://www.jsoftware.com/forums.htm
