R help - Apr 2011 - R equivalent to (D)QDAWO in Fortran?

Hi useRs,

I have a set of fortran code that was passed down from previous students, and I
am converting its algorithm into R codes.

I encounter this function in Fortran (D)QDAWO, which numerically integrates a
function f with a user-specified cosine or sine weight. It is used because the
original function that I want to integrate is f(x)*cos(x).

I tried in R to directly integrate by integrate(g(x)), where g(x)=f(x)*cos(x),
but a lot of error messages and warnings were given. So is there some function
in R that is equivalent to this QDAWO in Fortran, to specifically integrate a
function with a sine or cosine component?

Thank you very much!

dqdawo is an IMSL routine which is similar to QUADPACK's dqawo. (The initial
d is for double precision),
and maybe similar to NAG's d01anf.
If you search for 'imsl qdawo' you should find some more description.

On the other hand, the error messages may give someone enough information to
help you directly.
Maybe your function f() is not vectorized?
See the posting guide linked to at the bottom of every posting here.
Follow it well to get incredible help here; don't follow it to get guesses
or no response.

HTH,
-- David

-----Original Message-----
From: r-help-bounces at r-project.org [mailto:r-help-bounces at r-project.org]
On Behalf Of Bao, Wenkai
Sent: Monday, April 25, 2011 11:04 AM
To: r-help at r-project.org
Subject: [SPAM] - [R] R equivalent to (D)QDAWO in Fortran? - Found word(s) list
error in the Text body

Hi useRs,

I have a set of fortran code that was passed down from previous students, and I
am converting its algorithm into R codes.

I encounter this function in Fortran (D)QDAWO, which numerically integrates a
function f with a user-specified cosine or sine weight. It is used because the
original function that I want to integrate is f(x)*cos(x).

I tried in R to directly integrate by integrate(g(x)), where g(x)=f(x)*cos(x),
but a lot of error messages and warnings were given. So is there some function
in R that is equivalent to this QDAWO in Fortran, to specifically integrate a
function with a sine or cosine component?

Thank you very much!

______________________________________________
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.


This e-mail and any materials attached hereto, including, without limitation,
all content hereof and thereof (collectively, "XR Content") are
confidential and proprietary to XR Trading, LLC ("XR") and/or its
affiliates, and are protected by intellectual property laws.  Without the prior
written consent of XR, the XR Content may not (i) be disclosed to any third
party or (ii) be reproduced or otherwise used by anyone other than current
employees of XR or its affiliates, on behalf of XR or its affiliates.

THE XR CONTENT IS PROVIDED AS IS, WITHOUT REPRESENTATIONS OR WARRANTIES OF ANY
KIND.  TO THE MAXIMUM EXTENT PERMISSIBLE UNDER APPLICABLE LAW, XR HEREBY
DISCLAIMS ANY AND ALL WARRANTIES, EXPRESS AND IMPLIED, RELATING TO THE XR
CONTENT, AND NEITHER XR NOR ANY OF ITS AFFILIATES SHALL IN ANY EVENT BE LIABLE
FOR ANY DAMAGES OF ANY NATURE WHATSOEVER, INCLUDING, BUT NOT LIMITED TO, DIRECT,
INDIRECT, CONSEQUENTIAL, SPECIAL AND PUNITIVE DAMAGES, LOSS OF PROFITS AND
TRADING LOSSES, RESULTING FROM ANY PERSON'S USE OR RELIANCE UPON, OR
INABILITY TO USE, ANY XR CONTENT, EVEN IF XR IS ADVISED OF THE POSSIBILITY OF
SUCH DAMAGES OR IF SUCH DAMAGES WERE FORESEEABLE.