Re: Nested List Abs[]033 (8/24/2011 11:50:51 AM) comp.soft-sys.math.mathematica
data = RandomReal[{0, 2}, {100, 2}];
data2 = Select[data, Abs[#[[1]] - #[[2]]] wrote:
=============
I have a list, and each element of the
list is a sublist with two integers. How do I delete from t... Bob
Re: ? #8033 (8/11/2011 7:27:48 AM) comp.soft-sys.math.mathematica
http://reference.wolfram.com/mathematica/tutorial/SolvingEquations.html
---- David Kirkby wrote:
=============
The output of FindRoot[] when trying to find a root is like:
{x -> 0.49454545}
How... Bob
Re: Roots of a Jacobi polynomial #2044 (8/1/2011 10:58:40 AM) comp.soft-sys.math.mathematica
Restart Mathematica
eqlist = Rationalize[{
101.74 ==
a + ((0.055/(479248/c))*(352343 + ((479248/c)*a) - (158194*b/c))),
47205 + ((158194/c)*a) - ((61842/c)*b) == 68043.98 + (299.73*b),
... Bob
Re: special iterator038 (8/1/2011 3:36:44 AM) comp.soft-sys.math.mathematica I think that you mean this
Table[f[i], {i, DeleteCases[Range[10], 3 | 4]}]
{f[1], f[2], f[5], f[6], f[7], f[8], f[9], f[10]}
Bob Hanlon
---- "andre.robin3" wrote:
=============
If you use the... Bob
Re: work the way I want it to.042 (7/27/2011 10:18:40 AM) comp.soft-sys.math.mathematica Input it as a List, i.e., include the List brackets: {1,2,3,4,5}
Bob Hanlon
---- JonSilverman wrote:
=============
When prompted for an input by Input[], I want to input a list of
numbers. But w... Bob
Re: Roots of a Jacobi polynomial162 (7/27/2011 10:18:10 AM) comp.soft-sys.math.mathematica
Don't use machine precision
eqn1 = JacobiP[25, -1/2, -1/2, x] == 0;
soln1 = NSolve[eqn1, x, WorkingPrecision -> 15];
Length[soln1]
25
And @@ (eqn1 /. soln1)
True
And @@ (-1 15];
soln1... Bob
Re: Bug in Sum? #6045 (7/6/2011 12:29:43 PM) comp.soft-sys.math.mathematica
You can also try summing the parts
Sum[#, {n, 1, M}] & /@
Apart[1/(n (1 + n)) 1/((1 - x)^4), n] //
FullSimplify
M/((1 + M) (-1 + x)^4)
Bob Hanlon
---- Dario wrote:
=============
Tha... Bob
Re: can't Solve[1 - x == x^r, x]?034 (7/1/2011 12:43:36 AM) comp.soft-sys.math.mathematica I don't think that this can be solved for x[r]; however, you can also use ContourPlot to plot it.
ContourPlot[1 - x == x^r, {r, 0, 1}, {x, 0, 1/2},
AspectRatio -> 1/GoldenRatio,
FrameLabel -> {r, x}]
... Bob
Simplifying Bessel Functions #5140 (9/13/2011 11:21:17 AM) comp.soft-sys.math.mathematica Hi,
As a follow up, when I try
1/(2 rho) (6 - (3 BesselJ[2, BesselJZero[0, 1]] BesselJZero[0, 1])/
BesselJ[1, BesselJZero[0, 1]] +
BesselJZero[0, 1]^2) // FullSimplify
I don't get
1/2 Bess... sam.takoy(37)
complex functions handling in M8150 (9/13/2011 11:25:53 AM) comp.soft-sys.math.mathematica I wish to generate curves from a 3-variable complex function under
Mathematica 8. The results (shape of the curves) I get do not reflect
expectations. I am a rather old mathematica user and used this program
... amdikande(1)
Linear combination of Bessel functions235 (9/13/2011 11:30:29 AM) comp.soft-sys.math.mathematica Hi,
Suppose I have an expression that's a linear combination of Bessel
function. Kind of like this
r^2 + Cos[r] BesselJ[0, rho r] + 3 Sin[r] BesselJ[1, rho r] + Log[r]
BesselJ[2, rho r]
Is there a wa... sam.takoy(37)
Table->Value333 (9/14/2011 9:21:58 AM) comp.soft-sys.math.mathematica Hi to everyone,
I've got a problem that seem stupid, but is a lost of time to me.
I've generate a table with solutions of a series of equations
pfugacita =
v = Table[
NSolve[pressioni[[1, i]] - (R tempe... mariano.pierantozzi(7)
output forms536 (9/17/2011 10:28:50 AM) comp.soft-sys.math.mathematica Hello, I need Matheamtica to do the following:
in:
a=1;
b=2;
c=3;
d=a+b*c
out:
d=1+2*3
and so on...
previously I was using another system, but I found that this kind of stuff is impossible
... kitas11(1)
String Deletion743 (9/17/2011 10:30:53 AM) comp.soft-sys.math.mathematica Given a simple list of strings:
list = List["Z:XBREG","Z:XBREH","Z:XBREI","Z:ZZ6P","Z:ZZ6Q","aye"]
how does one delete all the strings with a colon (:) anywhere in the string?
DeleteCases[list, ___:__... donabc(55)
help with integration #2353 (9/23/2011 7:45:20 AM) comp.soft-sys.math.mathematica I am trying to do the following integration:
Integrate[r^2*ArcCos[x/r] - x*Sqrt[r^2 - x^2], {x, Sqrt[3] y, Sqrt[r^2 - y^2]} ]
When I try, Mathematica comes back to be with a very long conditional expressi... dsalman969335(2)
1-liner wanted533 (9/23/2011 7:45:50 AM) comp.soft-sys.math.mathematica Let's assume we have a list of elements of the type {x,y,z} for x, y and z integers. And, if needed we assume x < y < z. We also assume that the list contains at least 3 such triples.
Can Mathematica easily ... KHO(13)