Mathematica

Graphics3D question
I have some spheres in a 3D display. Each sphere has a number. Graphics3D[{{RGBColor[0.4, 1.0, 0.9, .2], EdgeForm[Gray], Table[Cylinder[{circls[[dx, 1]], circls[[dx, 1]] + .01*circls[[dx, 3]]}, circls[[dx, 2]]], {dx, 1, Length[circls]}]}, PointSize[0.015], Red, Point[taba1], ... 2 Jun 2010 02:14

Deleting Duplicates
I have a list 'a' in which there are 'sets', and I want to reduce the list so that repeated patterns are eliminated. Here is an example list: a = {{x1, x2}, {x1, x4}, {x2, x3}, {x4, x5}, {x4, x6}, {x2, x7}, {x7, x12}, {x3, x13}, {x13, x18}, {x6, x8}, {x5, x9}, {x9, x11}, {x9, x16}, {x8, x10}, {x12, x14... 10 Jun 2010 08:52

Colored wire ContourPlot3d
Hi, I am having problem converting something that I used to be able to do in earlier versions of Mathematica (<6.0). I would like to plot a wired-only 3d plot of a function, say f[x_,y_,z] := (x - 0.5) Exp[-0.5 ({x, y, z} - {0.5, 1., 1.}). ({x, y, z} - {0.5, 1., 1.})]; At the moment, ... 2 Jun 2010 02:14

Hurwitz Zeta Rational Sequence showing primes in the denominator
I've been looking at a zeta function to produce the primes and have come up with the following: Table[D[FindSequenceFunction[Table[Rationalize[ i^m N[Zeta[1 - m, (-i - 1)/i] + Zeta[1 - m, -(1/i)], 80]], {i, 80}] , n],{n, m}], {m, 30}] output : 2, 5/3, 6, 122/5, 120, 5000/7, 5040, 40656, 362880, 39312000/11, ... 1 Jun 2010 08:37

FSolve package
Hi there! If anyone need that package yet, it can be downloaded from this page: http://personales.unican.es/gutierjm/main/software.html Spent a lot of time to find it. But it has some little fixes to be done. At first - proper file naming. And I had to remove dependency on a InverseRule file. Good luck. ... 1 Jun 2010 05:23

Expanding Integrals with constants and 'unknown'
On Sun, May 30, 2010 at 11:45 PM, Jesse Perla <jesseperla(a)gmail.com> wrote: I have an integral involving constants and an 'unknown' function. I would like to expand it out to solve for the constants and keep the integrals of the unknown function as expected. i.e. Integrate[a + z + s[z], {z, clow, chigh}... 1 Jun 2010 05:24

Problems running Mathematica and WordMS together in
Hi, I also have been running MS Word 2007 with Mathematica 7.0.1 on my Win7 64-bits OS on a Acer Ferrari 5000 without problems until recently, when I started loosing contact with Mathematica during sessions. Several times I have had to close the program by the task manager. Could it be some MS updates which create... 1 Jun 2010 05:23

Problems running Mathematica and WordMS together in Win7
I have had some problems lately running Mathematica in Win7 64. Suddenly I loose contact with the program and have to kill the process (it's impossible to close down or quit within the programme). The problem is solved when setting Mathematica in compatibility mode for WinXP, but that creates other problems. Today ... 2 Jul 2010 03:40

Basic statistics - hypothesis testing and the power of a test
Can anyone provide a reference to or sample code to generate tables showing the power of test statistic in hypothesis testing for a single population. MiniTab includes such a feature. I do not see a specific native function in Mathematica 7 or in Abell's _Statistics with Mathematica_. Thanks, Kurt ... 31 May 2010 00:05

Statistics: making random samples
Q1: Are there any native Mathematica functions for making simple random and partitioned samples in Mathematica version 7? Abell's _Statistics with Mathematica_ (1998) authors two functions to make simple and stratified random samples: simpleRandomSample randomPartition - for Mathematica Version 3. Than... 1 Jun 2010 05:23