<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
<style type="text/css" style="display:none;"> P {margin-top:0;margin-bottom:0;} </style>
</head>
<body dir="ltr">
<div class="elementToProof">Hi,</div>
<div class="elementToProof">I'm struggling with trying to view data returned from make-moving-autocorrelation. The manual indicates data is available from mus-data, but I'm only seeing zeros if I'm doing that correctly. Moving-pitch, etc. work fine. Just
can't seem to see anything from moving-autocorrelation.</div>
<div><br>
</div>
<div class="elementToProof">Regards,</div>
<div class="elementToProof">Jim</div>
<div class="elementToProof"><br>
</div>
<div style="font-family: "Calibri", "Helvetica", sans-serif; font-size: 12pt; color: rgb(0, 0, 0);" class="elementToProof">
(let* ((n 512)</div>
<div style="font-family: "Calibri", "Helvetica", sans-serif; font-size: 12pt; color: rgb(0, 0, 0);" class="elementToProof">
(hop 128)</div>
<div style="font-family: "Calibri", "Helvetica", sans-serif; font-size: 12pt; color: rgb(0, 0, 0);" class="elementToProof">
(ac (make-moving-autocorrelation (make-readin "/oboe.snd") n hop )) </div>
<div style="font-family: "Calibri", "Helvetica", sans-serif; font-size: 12pt; color: rgb(0, 0, 0);" class="elementToProof">
(mydata (make-float-vector hop)) </div>
<div style="font-family: "Calibri", "Helvetica", sans-serif; font-size: 12pt; color: rgb(0, 0, 0);" class="elementToProof">
)</div>
<div style="font-family: "Calibri", "Helvetica", sans-serif; font-size: 12pt; color: rgb(0, 0, 0);" class="elementToProof">
(format #t "mus-data:\n") </div>
<div style="font-family: "Calibri", "Helvetica", sans-serif; font-size: 12pt; color: rgb(0, 0, 0);" class="elementToProof">
(let* ((data (mus-data ac))</div>
<div style="font-family: "Calibri", "Helvetica", sans-serif; font-size: 12pt; color: rgb(0, 0, 0);" class="elementToProof">
(len (length data)))</div>
<div style="font-family: "Calibri", "Helvetica", sans-serif; font-size: 12pt; color: rgb(0, 0, 0);" class="elementToProof">
(format #t "length data: ~A\n " len )</div>
<div style="font-family: "Calibri", "Helvetica", sans-serif; font-size: 12pt; color: rgb(0, 0, 0);" class="elementToProof">
<br>
</div>
<div style="font-family: "Calibri", "Helvetica", sans-serif; font-size: 12pt; color: rgb(0, 0, 0);" class="elementToProof">
(set! mydata (mus-data ac))</div>
<div style="font-family: "Calibri", "Helvetica", sans-serif; font-size: 12pt; color: rgb(0, 0, 0);" class="elementToProof">
(do ((i 0 (+ i 1)))</div>
<div style="font-family: "Calibri", "Helvetica", sans-serif; font-size: 12pt; color: rgb(0, 0, 0);" class="elementToProof">
((= i hop))</div>
<div style="font-family: "Calibri", "Helvetica", sans-serif; font-size: 12pt; color: rgb(0, 0, 0);">
(format #t "~A ~0,12F\n " i (mydata i) ) )))</div>
</body>
</html>