Mathematica

Newbie question: Using expanded Boolean Criteria w the Select
On 7 ago, 07:31, Scotty <Sco...(a)Yahoo.com> wrote: To find all 6 letter words where the 1st & last characters are not equal, the following works & returns a list of 9921 words l1 = Select[DictionaryLookup[], StringLength[#] == 6 & ]; Length[l1] l2 = Select[l1, StringTake[#, 1] != StringTake[#, -1] & ]; Le... 8 Aug 2010 07:59

Question about adding thumbnails and snapshots to Wolfram Demonstration.
Hi, For some reason, the thumbnails and snapshots in a Demonstration I just made change after I set them the way I want them to appear on Demonstrations.Wolfram.com. More specifically... I can make independent adjustments in snapshots, e.g., select different tabs for different snapshots. But these adjust... 8 Aug 2010 07:59

How to use the result of Solve in Plot?
Hello I want to use the result of Solve[{5*x+4*y==12},{y}] in Plot[.,{x,0,2}]. Plot[Solve[.],{x,0,2}] does not work. Many thanks Ed PS. I am new to Mathematica. ... 13 Aug 2010 07:02

Convex Hull again
I found the ConvexHull.m file and am using it successfully. But I can't seem to load or execute it automatically even though I put a copy in Documents and Settings\All Users\Application Data\Mathematica\AutoLoad, which contains a bunch of other .m files. I thought things in that folder are loaded automatically ... 7 Aug 2010 07:10

Combine these displays
dots = {13.450, 8.1090, -5.398, -6.511, -9.7456, 7.903, -8.392, -5.989, -4.612, 3.614, -8.564, -6.598, -6.794, -8.898, 7.082}; histo = {0, 0, 0, 0, 5, 79, 372, 2016, 4354, 2350, 776, 47, 0, 0, 0}; vertL=6; Print[ColumnForm[Subsets[Range[vertL], {2}]], PaddedForm[ColumnForm[dots], {5, 3}]]; ListPlot[... 8 Aug 2010 07:59

parallel computing and message disabling
Hi, If I evaluate Off[FindMinimum::"lstol"]; Off[FindMinimum::"nrnum"]; Off[ NIntegrate::"slwcon"]; Off[NIntegrate::"ncvb"]; and then ParallelTable[NIntegrate[1/x, {x, 0, 1}], {i, 1, 2}] I still get the messages, whereas if I use Table (not ParallelTable) if goes fine. Any idea of how to let Para... 7 Aug 2010 07:10

Programming / Design question
Hi, Task: Compute "histogram feature" for certain object properties. Object is represented by 2D point set. Histogram position(offset) and integral object feature to compute is formalized separately. My solution (mathematica code): (* offset computation, single point update *) PointUpdateResult[res_, x_, y_, Or... 7 Aug 2010 01:49

> classroom combinatorics
> She has 28 students in her class and wants them to meet in groups four=85 You may find the following Wolfram Demonstration interesting... http://demonstrations.wolfram.com/SocialGolferProblem Just some other references http://www.maa.org/editorial/mathgames/mathgames_08_14_07.html http://mathworld.w... 7 Aug 2010 01:49

Default and head in function argument
Hi, I know how to define a function so that it evaluates only when the head of the argument is of a certain type: Clear[f]; f[x_Integer?Positive] := x^3 f[3] f[3.1] f[-3] 27 f[3.1] f[-3] and I also know how to set default to an argument of a function like so: Clear[f] f[x_:3] f[] 27 How d... 10 Aug 2010 04:45

Newbie question: Using expanded Boolean Criteria w the Select funtion
To find all 6 letter words where the 1st & last characters are not equal, the following works & returns a list of 9921 words l1 = Select[DictionaryLookup[], StringLength[#] == 6 & ]; Length[l1] l2 = Select[l1, StringTake[#, 1] != StringTake[#, -1] & ]; Length[l2] 10549 9921 What does it take to get thi... 8 Aug 2010 07:59