R help - May 2010 - Run na.approx on dataset with some blank columns

I am trying to run na.approx on a zoo object in which some of the columns
contain nothing by NA values. When I do this I get the following error:

Error in approx(x[!na], y[!na], xout, ...) : 
  need at least two non-NA values to interpolate

Is there a way I can use na.approx with my dataset so that the columns with some
data are interpolated and the columns filled with NAs are ignored? The resulting
zoo matrix should have the same dimensions as the input object.

Thanks.

Abiel

This communication is for informational purposes only. It is not
intended as an offer or solicitation for the purchase or sale of
any financial instrument or as an official confirmation of any
transaction. All market prices, data and other information are not
warranted as to completeness or accuracy and are subject to change
without notice. Any comments or statements made herein do not
necessarily reflect those of JPMorgan Chase & Co., its subsidiaries
and affiliates.

This transmission may contain information that is privileged,
confidential, legally privileged, and/or exempt from disclosure
under applicable law. If you are not the intended recipient, you
are hereby notified that any disclosure, copying, distribution, or
use of the information contained herein (including any reliance
thereon) is STRICTLY PROHIBITED. Although this transmission and any
attachments are believed to be free of any virus or other defect
that might affect any computer system into which it is received and
opened, it is the responsibility of the recipient to ensure that it
is virus free and no responsibility is accepted by JPMorgan Chase &
Co., its subsidiaries and affiliates, as applicable, for any loss
or damage arising in any way from its use. If you received this
transmission in error, please immediately contact the sender and
destroy the material in its entirety, whether in electronic or hard
copy format. Thank you.

Please refer to http://www.jpmorgan.com/pages/disclosures for
disclosures relating to European legal entities.

Here is a workaround:

library(zoo)

# test data
z <- zoo(cbind(1:5, NA, c(1:3, NA, 5), NA))

ix <- colSums(!is.na(z)) > 0
z[, ix] <- na.approx(z[, ix])


On Mon, May 3, 2010 at 12:41 PM, Abiel X Reinhart
<abiel.x.reinhart at jpmchase.com> wrote:
> I am trying to run na.approx on a zoo object in which some of the columns
contain nothing by NA values. When I do this I get the following error:
>
> Error in approx(x[!na], y[!na], xout, ...) :
> ?need at least two non-NA values to interpolate
>
> Is there a way I can use na.approx with my dataset so that the columns with
some data are interpolated and the columns filled with NAs are ignored? The
resulting zoo matrix should have the same dimensions as the input object.
>
> Thanks.
>
> Abiel
>
> This communication is for informational purposes only. It is not
> intended as an offer or solicitation for the purchase or sale of
> any financial instrument or as an official confirmation of any
> transaction. All market prices, data and other information are not
> warranted as to completeness or accuracy and are subject to change
> without notice. Any comments or statements made herein do not
> necessarily reflect those of JPMorgan Chase & Co., its subsidiaries
> and affiliates.
>
> This transmission may contain information that is privileged,
> confidential, legally privileged, and/or exempt from disclosure
> under applicable law. If you are not the intended recipient, you
> are hereby notified that any disclosure, copying, distribution, or
> use of the information contained herein (including any reliance
> thereon) is STRICTLY PROHIBITED. Although this transmission and any
> attachments are believed to be free of any virus or other defect
> that might affect any computer system into which it is received and
> opened, it is the responsibility of the recipient to ensure that it
> is virus free and no responsibility is accepted by JPMorgan Chase &
> Co., its subsidiaries and affiliates, as applicable, for any loss
> or damage arising in any way from its use. If you received this
> transmission in error, please immediately contact the sender and
> destroy the material in its entirety, whether in electronic or hard
> copy format. Thank you.
>
> Please refer to http://www.jpmorgan.com/pages/disclosures for
> disclosures relating to European legal entities.
>
> ______________________________________________
> R-help at r-project.org mailing list
> https://stat.ethz.ch/mailman/listinfo/r-help
> PLEASE do read the posting guide
http://www.R-project.org/posting-guide.html
> and provide commented, minimal, self-contained, reproducible code.
>