Description:
Mathematica discussion group. (Moderated)
|
|
|
Mathematica Sorting Anti-Stable?
|
| |
Consider: In[97]:= sortTestPoints = {{1, 1}, {1, 2}, {2, 1}, {2, 2}} Out[97]= (1 1 1 2 2 1 2 2 ) To produce a lexical sort, first sort by the second element. Notice it reverses the order of the first element (first clue that "Sort" might be antistable) In[99]:= Sort[sortTestPoints, #1[[2]] < #2[[2]] &]... more »
|
|
|
computing expectations for probability distributions in mathematica
|
| |
hi all, i am trying to see if there is a simplified expression for a particular random variable using mathematica. i have two independent binomial random variables, X and Y, and i'd like to compute the expectation of X/(X+Y). more formally, X is distributed Binomial(p1, n) and Y is distributed Binomial(p2, n). note that p1 and p2 can be... more »
|
|
|
Solve how to eliminate variable
|
| |
Hi dears, I am using Solve to get differential equation from set of linear and differential equation. When I use code like this Solve[{ Subscript[F, t] == g m \[Phi][t], l Subscript[k, p] \!\(\*SuperscriptBox["\[Phi]", "\[Prime]", MultilineFunction->None]\)[t] == Subscript[F, p], l m \!\(\*SuperscriptBox["\[Phi]", "\[Prime]\[Prime]",... more »
|
|
|
Replacing Values Close to One
|
| |
Hello everyone, Is there a replacement rule that I can apply to {-8, .7, 0, 1.003} /. [what goes here?] -> 1 to replace values that are close to 1, like 1.003, by 1? Regards, Gregory
|
|
|
Formal Concept Analysis
|
| |
Is anyone aware of existing Mathematica code for doing Formal Concept Analysis? Specifically, I need to generate the closed sets and graph the resulting lattice for a given set of objects and corresponding attributes. Todd
|
|
|
When Wolfram's technical support cannot help
|
| |
Hi I sent this email to technical support (as I hold a premier licence) I am looking for a single function that will extract the cyclic part of (a) a completely cyclic sequence and (b) an eventually cyclic sequence. So if data1={1,2,3,1,2,3,1,2,3,1,2,3 } then cyclicpart[data1] should return {1,2,3} And if... more »
|
|
|
How to make large graphics object fit within a plot?
|
| |
I am trying to add a disk at some location on top of an existing plot. So I use Epilog to add the disk. But it seems if the disk is larger than the plot image size, it gets chopped off. I wanted the whole disk to show. I tried increasing ImagePadding for the plot, and also ImageMargins, but this did not help.... more »
|
|
|
How to convert functionsto a form in terms of standard special
|
| |
Hi, all. I want to know is there any function in mathematica which is similarly to convert(...., StandardFunctions) in another system? I want to convert functions represented in terms of hypergeometric functions and Meijer G functions to a form in terms of standard special and elementary functions. For example, in another system,... more »
|
|
|
problem about calling Mathematica in Fortran
|
| |
¶Àí дµÀ: ...Hi all, I forgot to paste the output: "LinkConnect::linkc: -- Message text not found -- (LinkObject[p7f_shm, 1, 1])" And I checked the document about "LinkConnect::linkc", it says: "This message is generated by an attempt to access a MathLink connection that is not active." So why does MathLink connection is not active? Is it related to Fortran?... more »
|
|
|
random walk visualization
|
| |
Dear Community, I am making a demonstration for a lecture on random walk. This should show the random walk evolving in 2D. The following works nicely: x := 0; y := 0; tab = Table[{x += RandomInteger[{-1, 1}], y += RandomInteger[{-1, 1}]}, {1000}]; imTab = Table[ Show[{Graphics[{Blue, Line[tab[[1 ;; i]]]}],... more »
|
|
|
|
