From: Peter Pein on
Am Sun, 13 Jun 2010 08:12:47 +0000 (UTC)
schrieb Bob Hanlon <hanlonr(a)cox.net>:

>
> data = Thread[Array[#, 3] & /@ {x, y}]
>
....
> {1, 1/2} # & /@ data
>
data.{{1,0},{0,1/2}} is another simple solution to Rui's problem
>
>
> Bob Hanlon
>