slope/cofficient of power law distribution

coef(lm (log10(vouty) ~ log10(voutx)))? This the
slope / coefficient of log10(voutx) should be an estimate of the power.

http://maths.newcastle.edu.au/~rking/R/help/03a/7022.html