How can I increase period of waveform from 1 cps (hz) to 4000 cps
- To: mathgroup at smc.vnet.net
- Subject: [mg102853] How can I increase period of waveform from 1 cps (hz) to 4000 cps
- From: Rick T <ratulloch at gmail.com>
- Date: Sun, 30 Aug 2009 06:07:52 -0400 (EDT)
How can I increase period of waveform from 1 cps (hz) to 4000 cps (hz) and make it stereo instead of mono Greetings All I can create a 1 second mono signal using the piecewise function below but I would like it to be be repeated 4000 times in 1 second how can I do this? And how can I turn the mono signal created into a stereo signal? See equation below: Play[Piecewise[{{-792.7927814*x^2 + 78.27580762*x, 0 <= x <= 0.0986084393351466}, {-537.3920769*x^2 + 115.4556059*x - 6.149662379, 0.0986084393351466 <= x <= 0.116474865132018}, {-4.604891231*x^2 + .8783376807* x - .3229150958*10^-1, 0.116474865132018 <= x <= 0.139543540917858}, {528.7355901*x^2 - 149.0297555*x + 10.50099554, 0.139543540917858 <= x <= 0.143629773251382}, {376.7790009*x^2 - 110.4620013*x + 8.096307986, 0.143629773251382 <= x <= 0.148062653195675}, {-5366.794754*x^2 + 1614.793457*x - 121.4358140, 0.148062653195675 <= x <= 0.152415654575672}, {3596.157814*x^2 - 1113.549316*x + 86.19218140, 0.152415654575672 <= x <= 0.157553494547717}, {33439.86328*x^2 - 10660.18884*x + 849.4852051, 0.157553494547717 <= x <= 0.161140422458708}, {-935.3252173*x^2 + 307.4128732*x - 25.24451926, 0.161140422458708 <= x <= 0.168091379048892}, {-8381.081165*x^2 + 2859.568434*x - 243.8621791, 0.168091379048892 <= x <= 0.173061347244545}, {7129.220444*x^2 - 2474.453417*x + 214.7137293, 0.173061347244545 <= x <= 0.176830854731068}, {37367.06992*x^2 - 13467.30564*x + 1213.077297, 0.176830854731068 <= x <= 0.183303047100966}, {8020080.206*x^2 - 2950665.980*x + 271391.3264, 0.183303047100966 <= x <= 0.184607223152307}, {-94.86078842*x^2 + 38.76322404*x - 3.905099121, 0.184607223152307 <= x <= 0.201443088678393}, {-9454.145556*x^2 + 3827.969449*x - 387.4211120, 0.201443088678393 <= x <= 0.204867977216098}, {-2293271.932*x^2 + 965436.3355*x - 101536.3212, 0.204867977216098 <= x <= 0.216081152564001}, {26305.07154*x^2 - 11646.72138*x + 1289.392401, 0.216081152564001 <= x <= 0.226790966165469}, {-15927.23520*x^2 + 7195.265993*x - 811.6176441, 0.226790966165469 <= x <= 0.233512430372518}, {-4466.203128*x^2 + 2189.160167*x - 267.5774948, 0.233512430372518 <= x <= 0.256712208436901}, {-861797.8205*x^2 + 514604.5680*x - 75311.72213, 0.256712208436901 <= x <= 0.340417336336429}, {-327280.6943*x^2 + 224323.3372*x - 38436.92155, 0.340417336336429 <= x <= 0.344937448744588}, {1632.403725*x^2 - 1143.793367*x + 200.4484663, 0.344937448744588 <= x <= 0.372637559763113}, {339.4945421*x^2 - 287.8919627*x + 61.03920974, 0.372637559763113 <= x <= 0.431403078393077}, {1.234646433*x^2 - 1.316067578*x + .3625674295, 0.431403078393077 <= x <= 0.578627387037763}, {390.5092971*x^2 - 453.5297186*x + 131.6928599, 0.578627387037763 <= x <= 0.59213700771348}, {-722.9620437*x^2 + 873.1694573*x - 263.4825552, 0.59213700771348 <= x <= 0.618275556195711}, {-5862.906032*x^2 + 7456.298233*x - 2368.851202, 0.618275556195711 <= x <= 0.653527361324473}, {15.39829080*x^2 - 21.47833384*x + 7.468296169, 0.653527361324473 <= x <= 0.763575171814988}, {14.34836229*x^2 - 23.88696570*x + 9.919625373, 0.763575171814988 <= x <= 0.885248483194818}, {4.036598716*x^2 - 7.750631687*x + 3.715927095, 0.885248483194818 <= x <= 0.993739042055684}, {-36.10301241*x^2 + 71.97736702*x - 35.87433821, 0.993739042055684 <= x <= 1}}], {x, 0, 1}, SampleRate -> 44100] tia sal22