# HG changeset patch # User matthiasm # Date 1385736925 0 # Node ID ce44317dd0554b909658ab4a5b9653138921193e # Parent f2c853101aeb1a73214c3a5bc90e682c7c69803a# Parent 896b89e67f3ccb93aa11ae911db90ad798471675 merge diff -r 896b89e67f3c -r ce44317dd055 generateIcon.R --- a/generateIcon.R Fri Nov 29 14:53:46 2013 +0000 +++ b/generateIcon.R Fri Nov 29 14:55:25 2013 +0000 @@ -5,6 +5,7 @@ sin1 <- sin(t) + pitchDiff sin2 <- sin(t) +pad <- 3 lineWidth <- 15 outlineWidth <- 20 sz <- 200 @@ -14,7 +15,10 @@ plot(t, sin1 * w + sin2 * (1-w), type='l', lwd=lineWidth, bty='n', xaxt='n', yaxt='n', ylim = c(-pad, pitchDiff+pad) + c(1,-1)*0.1, - xlim = c(0, 8*pi) + c(1,-1)*0.1) + xlim = c(0, 8*pi) + c(1,-1)*0.1, + col="white") +plot(t, sin1 * w + sin2 * (1-w), type='l', + lwd=lineWidth, col = blacj) lines(c(0,0),c(-pad,pitchDiff+pad), lwd=outlineWidth, col = 'blue', lend=2) lines(c(0,0)+8*pi,c(-pad,pitchDiff+pad), lwd=outlineWidth, col = 'blue', lend=2) lines(c(0,8*pi),c(0,0)+pitchDiff+pad, lwd=outlineWidth, col = 'blue', lend=2) diff -r 896b89e67f3c -r ce44317dd055 tony.icns Binary file tony.icns has changed