Feigenbaum diagram

The following K program calculates the Feigenbaum diagram:

X:(!400)%100
`0:,/" ",',/"\n",'$,/({x,'}'X)@'{[x]300_{[y]x*y*1-y}\[400;0.5]}'X

Data is written to stdout, in the format X Y, i.e. suitable for gnuplot et al.

Feigenbaum diagram