11
votes
1answer
262 views

How can I make FilledCurve smoother?

In How can I generate and randomly assign color to annular sectors? J.M. showed an interesting way to create a sector graphic using FilledCurve. Unfortunately it ...
2
votes
1answer
67 views

Forcing a locator button to remain on the surface of a sphere

This question may or may not be possible and might be a hard one to answer. Suppose that I have a sphere centered at the point (1,2,-1) with radius 3. Is it possible to place a locator button on the ...
11
votes
2answers
258 views

Does Mathematica have an equivalent of C's nextafter?

In C (and many other programming languages), there is a function double nextafter(double x, double y) which takes two (IEEE 754) floating-point numbers and ...
10
votes
2answers
473 views

Does Mathematica have an equivalent of Python's float.as_integer_ratio?

The Python programming language has a float.as_integer_ratio(x) function which exactly converts an IEEE 754 floating-point number into a numerator/denominator pair ...
1
vote
1answer
114 views

Changing from Dashed to Solid

I have: Graphics[{ Blue, Thick, Arrow[{{0, 0}, f1}], Arrow[{{0, 0}, f2}], Red, Arrow[{{0, 0}, f1 + f2}], Dashed, Blue, Line[{{-9, 0}, {12, 0}}] }] ...
1
vote
1answer
82 views

How to reduce trigonometric expressions under special conditions

For the following problems I used "FullSimplify" and "TrigReduce" but I manage to reduce more by hand. ...
1
vote
1answer
100 views

Add a portion of a unit circle

Consider: ...
7
votes
2answers
99 views

Undo history cleared after removing comments - bug?

If I've written some code followed by a comment, like this: x(*y*) and I remove the comment by first removing the right delimiter and then the left, my undo ...
4
votes
1answer
87 views
0
votes
0answers
130 views
1
vote
1answer
84 views

Diff eqs can be solved?

I'm trying to solve a pair of coupled differential equations, but am having trouble making DSolve evaluate my equations. ...
1
vote
1answer
84 views

Import a jpeg file and a mov file and display them side by side

I am planning to use Mathematica for a presentation. In one of the slides I need to place a jpeg file side by side to a mov file. ...
0
votes
0answers
40 views

Create graph K5, delete 2 edges and 2 vertex, create adjacency matrix [duplicate]

I need help about this problem. I should create graph K5, delete 2 edges and 2 vertex from it and from the new graph create adjacency matrix. I have poor knowledge and i don't need anyone to solve the ...
1
vote
2answers
159 views

Why doesn't Plot draw function within prescribed range?

I have a function: TheoreticalFunction[x_] = 2 / Pi * ArcSin[x] And trying to plot its derivative: ...
-2
votes
1answer
215 views

Creating truth tables [closed]

I want to write a module in Mathematica that receives a Boolean function f. The module should write on screen: Truth table of function ...
2
votes
2answers
252 views

Gradient in a plotstyle

I'm trying to replicate the figure below. Now a nice first approach to do this is by using Mathematica, by making some kind of contourplot with circles and just add a gradient to the contourstyle. Now ...
0
votes
1answer
102 views

Creating Matrix,Inverted and Upper Triangulate inside Module

I was trying to fit this into a module but I didn't have any luck. And for some reason it won't Inverse the Matrix. Here's the code: Input: ...
2
votes
1answer
56 views

Transformation syntax with shortcuts to a more explicit syntax for an equation

I would like to write the following code line without the signs @#%^&*?! Sequence @@ (XMLNote[#1, m] &) /@ attributes I have made this code but it seems ...
4
votes
3answers
340 views

Using NDSolve within Manipulate

I'm trying to use NDSolve inside manipulate. Specifically, I have a series of differential equations with coefficients, k1, k2, ...
0
votes
0answers
41 views

Where can I find mathematica documentation about @@@? [duplicate]

For example, to build a rule from 2 lists {a,b,c},{1,2,3},I use : Rule @@@ Transpose[{{a, b, c}, {1, 2, 3}}] : {a -> 1, b -> 2, c -> 3} OK, but how @@@ works ? (Black magic for me) I am using ...
1
vote
1answer
80 views

Descending order of Permutations using Select[Tuples[{5, 4, 3, 2, 1}, {3}], OrderedQ]

I was wondering if there is a possible way to still use OrderedQ and get a descending order of permutations: This is Ascending order: ...
0
votes
1answer
64 views

How can I plot the complex formula as follow? [closed]

I try for this ... I want to see the result like this ...
1
vote
1answer
64 views

Delete Edges in Kpartite Graph

I need to make a K7,2 partite graph , with deleting 2 vertices and plus 2 more random edges , and after that my vertices should be green color. I made the graph K7,2 and deleted 2 vertices with this ...
2
votes
1answer
89 views

DeleteVertex in Kpartite graph

How can i make K7,2 graph and how can i delete 2 vertex? Btw, i need to use package -> Combinatorica`; I tried this: ...
-1
votes
1answer
69 views

Help needed with assignment [closed]

Can I get some help with this: Write a module which as an input receives two matrices, the first matrix transforms in to the same matrix, but in the new matrix occur absolute values of the first, ...
19
votes
2answers
666 views

What is the FrontEnd?

Can anyone sort out what the Front-End is, how it is structured and what its relationship to the Kernel is. The FrontEnd is mentioned quite often but elusively avoids to be caught and clearly defined. ...
5
votes
2answers
885 views

Solve wave equation using DSolve?

The wave equation with pined-pined boundary has well-known solutions, but directly input the equation into Mathematica does not return them. $$EI\cfrac{\partial^4 w}{\partial x^4} + ...
3
votes
1answer
116 views

Rotate a region about z-azis [duplicate]

I learned how to do this: ...
2
votes
3answers
185 views

Mathematica's ViewPoint versus MATLAB's View command

Here is a bit of code borrowed from Parametrize a circle as a tube?. ...
5
votes
1answer
222 views

Solution to $y = x^x (1-x)^{(1-x)}$ for $x$ [closed]

Does anyone have any insight to a symbolic Mathematica solution to this equation for $x$ in terms of y? Symbolic of any sort, just not numeric. $$y = x^x (1-x)^{(1-x)}$$
6
votes
1answer
75 views

How to force evaluation of an expression with Part left unnevaluated?

My goal is to minimize a real valued multi-variable function averageFreeEnergyDensity. The function accepts an integer argument ...
2
votes
2answers
72 views

Graph not drawing after VertexDelete

I'm very new to Mathematica and am currently trying the VertexDelete function, but after using it, my graph isn't drawing. Input: ...
1
vote
3answers
109 views

Use Do to evaluate an expression over two indices $i \ne j$ (over a list of tuples)?

I have an expression of the form: expr1[i_,j_] = Sum[\[Beta][j]*\[Phi][i, j]* C[i] I would like to evaluate this expression over i=1:4, j=1:4 with i!= j. One ...
0
votes
0answers
32 views

I have trouble in sorting a matrix in wolfram mathematica [duplicate]

I have an array of five elements, I have to make permutations of 3 elements. I have my code: A = {1, 2, 3, 4, 5}; n = Permutations[A, {3}]; Now I have to sort ...
4
votes
2answers
198 views

Parametrize a circle as a tube?

I have this code: ...
0
votes
0answers
81 views

How to determine why Solve[] failed?

I don't know what to make of Solve[] failing on this: ...
3
votes
0answers
64 views

Export to MX seems to corrupt the in-memory Dataset

I have a function that does a large number of calculations (by calling out to other smaller functions), and then builds a large Dataset object. Then I do two ...
4
votes
3answers
542 views
0
votes
0answers
63 views

Bug (?) in Mathematica in Derivative of function with Abs [duplicate]

I encountered a weird problem with Derivatives in Mathematica, see the following code: ...
5
votes
1answer
386 views

How to program efficient undershoot/overshoot

I would like to solve the following boundary value problem for $y(x)$ for a fixed value of $k$ between $0 < k <1$: $$y'' + \frac{3}{x} y' - y + \frac{3}{2}y^2 - \frac{k}{2}y^3=0 \\ y'(0) = ...
8
votes
1answer
104 views

Setting an image as the background of a GeoGraphics image

It's easy to set the background of a GeoGraphics image to black, e.g., ...
5
votes
3answers
128 views

Encapsulated plot function misbehaves

To insure a collection of plots has identical appearance, the plot command is encapsulated in a function. The results are undesirable. The fiducial plot is ...
3
votes
2answers
261 views

Recursive Euclidean algorithm in Mathematica

Can anyone explain to me how do I use a recursion, if I don't know the limit? For example, I need the remainder $r$ of the Euclidean algorithm for $\gcd(a,b)$ which equals $0$. I figured out that the ...
4
votes
3answers
87 views

Automatically split an expression and use TrigFactor to solve the parts

I want to simplify the following expression: 1/2*(Sqrt[3]*Cos[x]*la - Sin[x]*la - lb + Sqrt[3]*Cos[x+y]*lf - Sin[x+y]*lf) I used ...
1
vote
3answers
84 views

ListPlot the results of FindMaximum [closed]

I want to plot a list of the form whose elements are of the form {value, {x -> value_x, y -> value_y}} The list generated by FindMaximum applied on ...
7
votes
4answers
147 views

How to map Unevaluated over a list

I have a list {a1, a2, ...... , an}, in which all as have been initialized to a number. I want to get: ...
4
votes
2answers
214 views

Improve simulation speed using Compile

I have two square matrices, a hermitian matrix h and an unitary matrix v. I am interested in the following function ...
5
votes
2answers
229 views

Trigonometric simplification

How can I simplify 1/2 (Sqrt[3] Cos[x] - Sin[x]) in order to get Cos[x + Pi/6] on Mathematica? I saw that Wolfram|Alpha lists ...
0
votes
1answer
96 views

Numerical integral speed

I have the following code to calculate a numerical integral for any given a, however it takes a very long time, even with adaptivemontecarlo, which is not accurate enough: ...
2
votes
1answer
51 views

Animating an InterpolationFunction and its integral

I have a list of data that I interpolate (Omega[t]) and animate - it is working fine, but an Integrate over the ...

15 30 50 per page