Re: A better way to decimate a file??
- To: mathgroup at smc.vnet.net
- Subject: [mg21365] Re: [mg21350] A better way to decimate a file??
- From: Andrew Watson <abwatson at mail.arc.nasa.gov>
- Date: Wed, 29 Dec 1999 23:18:40 -0500 (EST)
- References: <199912280549.AAA26106@smc.vnet.net>
- Sender: owner-wri-mathgroup at wolfram.com
At 12:49 AM -0500 12/28/99, Rob Peterson wrote:
>I start with a list y that I need to decimate (sp?).
DownSample::usage =
"DownSample[array,steps,starts]: down-sample an n-dimensional array. \
steps is a list of sampling periods for each dimension, in the order they are \
given by Dimensions[]. starts is a list of starting coordinates (the location \
in the input of the first element in the output).";
DownSample[array_List,steps_List,starts_List] :=
Part @@ Prepend[Table[Range[starts[[i]]
,Dimensions[array][[i]]
,steps[[i]]]
,{i,TensorRank[array]}],array]
Andrew B. Watson
MS 262-2
NASA Ames Research Center
Moffett Field, CA 94035-1000
(650) 604-5419 (650) 604-0255 fax
abwatson at mail.arc.nasa.gov http://vision.arc.nasa.gov/
- References:
- A better way to decimate a file??
- From: rob-piovere@swbell.net (Rob Peterson)
- A better way to decimate a file??