Mathematica 9 is now available
Services & Resources / Wolfram Forums
-----
 /
MathGroup Archive
1993
*January
*February
*March
*April
*May
*June
*July
*August
*September
*October
*November
*December
*Archive Index
*Ask about this page
*Print this page
*Give us feedback
*Sign up for the Wolfram Insider

MathGroup Archive 1993

[Date Index] [Thread Index] [Author Index]

Search the Archive

WorkingPrecision-problem

  • To: mathgroup at yoda.physics.unc.edu
  • Subject: WorkingPrecision-problem
  • From: bfypk at phoenix.oulu.fi (Petteri Kettunen)
  • Date: Wed, 22 Sep 1993 14:51:25 -0100 (GMT-2:00)

	Dear group,

I define a function and parameters of given values as follows;

b=4.472135955/100;
w=2 Pi 7*10^7;
t=0.00000001428571;
rho=0;

p[v_,theta_]:=N[
NIntegrate[(b*Cos[w*x+rho]-
(b*10^(v/20))*Cos[w*x + theta])^2,{x,0,t}]/t]

and then I try to evaluate a simple matrix of function p, and problems occur;


Table[p[v,t],
{v, 0.01, 0.1,0.01}, {t, 0.00175, 0.0175,0.00175}]

NIntegrate::slwcon: 
   Numerical integration converging too slowly; suspect one
     of the following: singularity, oscillatory integrand,
     or insufficient WorkingPrecision.
NIntegrate::slwcon: 
   Numerical integration converging too slowly; suspect one
     of the following: singularity, oscillatory integrand,
     or insufficient WorkingPrecision.

How should I redefine the WorkingPrecision option, that I could try if 
it helps. Or does anyone notice if something else is fatally wrong in
my definitions.

Thanks,

Petteri

-----------------------------
Petteri Kettunen
Univ. Of Oulu
Dept. of Biophysics
e-mail: bfypk at phoenix.oulu.fi
-----------------------------





  • Prev by Date: Mathematica: Statistics Packages - Discrete & Continuous Distributions
  • Next by Date: symbol v/: - how many values?
  • Previous by thread: Mathematica: Statistics Packages - Discrete & Continuous Distributions
  • Next by thread: symbol v/: - how many values?