txt =: 'now is the time to do the work' txt now is the time to do the work wdcnt =: 3 : '1++/'' ''=y' wdcnt 3 : '1++/'' ''=y' wdcnt txt 8 txt now is the time to do the work wdcnt1 =: '>: +/ '' ''&= y' wdcnt1 =: 3 : '>: +/ '' ''&= y' wdcnt1 txt 8 wdcnt 3 : '1++/'' ''=y' wdcnt1 3 : '>: +/ '' ''&= y' wdcnt2 =: >: & (+/) & (' '&=) wdcnt2 txt 8 txt =:'now is the time to do the work' t =: ' |open quote | t =: ' | ^ |[-14] history-20080930 t =: ' '&= txt t 0 0 0 1 1 1 0 0 1 1 0 0 0 1 0 0 0 0 1 1 0 0 1 1 1 1 1 1 0 0 1 1 1 1 0 0 0 1 0 0 0 0 (1 }. t) *. _1 }. t 0 0 0 1 1 0 0 0 1 0 0 0 0 0 0 0 0 0 1 0 0 0 1 1 1 1 1 0 0 0 1 1 1 0 0 0 0 0 0 0 0 # txt 42 #(1 }. t) *. _1 }. t 41 1, -. (1 }. t) *. _1 }. t 1 1 1 1 0 0 1 1 1 0 1 1 1 1 1 1 1 1 1 0 1 1 1 0 0 0 0 0 1 1 1 0 0 0 1 1 1 1 1 1 1 1 (1, -. (1 }. t) *. _1 }. t)#txt now is the time to do the work sq =: *: i. 21 sq 0 1 4 9 16 25 36 49 64 81 100 121 144 169 196 225 256 289 324 361 400 d =: (1 }. sq) - _1 }. sq d 1 3 5 7 9 11 13 15 17 19 21 23 25 27 29 31 33 35 37 39 cpm =: 3 : '(1 , -. (1 }. t)*. _1 }. t =. '' '' y) # y' cmp =: cpm cmp cpm cpm 3 : '(1 , -. (1 }. t)*. _1 }. t =. '' '' y) # y' cmp txt |syntax error: cpm | (1,-.(1}.t)*._1}.t=. ' 'y)#y cmp =: 3 : '(1 , -. (1 }. t)*. _1 }. t =. '' '' = y) # y' cmp txt now is the time to do the work cmp 3 : '(1 , -. (1 }. t)*. _1 }. t =. '' '' = y) # y' cmp1 =: 3 : '(1 , -. (1 }. t)*. _1 }. t =. '' '' = '' '' ,y , '' '') # y' cmp1 txt |length error: cmp1 | (1,-.(1}.t)*._1}.t=.' '=' ',y,' ') #y cmp1 =: 3 : '(1 , -. (1 }. t)*. _1 }. t =. '' '' = y) # y =. '' '' , y , '' ''' cmp1 3 : '(1 , -. (1 }. t)*. _1 }. t =. '' '' = y) # y =. '' '' , y , '' ''' cmp1 txt now is the time to do the work #cmp1 txt 32 #cmp txt 30 txt =: ' ',txt,' ' cmp1 txt now is the time to do the work #cmp1 txt 32 cmp1 =: 3 : '1 }. _1 }. (1 , -. (1 }. t)*. _1 }. t =. '' '' = y) # y =. '' '' , y , '' ''' cmp1 txt now is the time to do the work #cmp1 txt 30 txt now is the time to do the work cmp2 =: 13 : '1 }. _1 }. (1 , -. (1 }. t)*. _1 }. t =. '' '' = y) # y =. '' '' , y , '' ''' cmp2 3 : '1 }. _1 }. (1 , -. (1 }. t)*. _1 }. t =. '' '' = y) # y =. '' '' , y , '' ''' cmp2 =: 13 : '1 }. _1 }. (1 , -. (1 }. '' ''=y)*. _1 }. '' '' = y) # y =. '' '' , y , '' ''' cmp2 txt now is the time to do the work #cmp2 txt 30 cmp2 3 : '1 }. _1 }. (1 , -. (1 }. '' ''=y)*. _1 }. '' '' = y) # y =. '' '' , y , '' ''' table 1 : '[ by ] over x./' 'ab' =/'aabnowbbisathebbb' 1 1 0 0 0 0 0 0 0 0 1 0 0 0 0 0 0 0 0 1 0 0 0 1 1 0 0 0 0 0 0 1 1 1 +./ 'ab' =/'aabnowbbisathebbb' 1 1 1 0 0 0 1 1 0 0 1 0 0 0 1 1 1