TransWikia.com
  1. All Categories
  2. Mathematica

Mathematica : Recent Questions and Answers (Page 217)

Find answers to your questions about Mathematica or help others by answering their Mathematica questions.

How to load a function from an external notebook that creates a docked cells toolbar?

I coded a compact toolbar in its own file nbtaskmate.nb for various common notebook tasks which I would like to load onto any notebook I might have open with a...

Asked on 12/12/2020

1 answer

Contour plot with 2 equations and 3 variables

I have $f(x,y,z)=0$ and $g(x,y,z)=0$. I want to exclude parameter $z$ and extract a line $x(y)$. I tried contourplot3D but then I need to map intersection...

Asked on 12/12/2020 by Alexander Nikolaenko

2 answer

Incorrect number or type of arguments when using @contains[ ]

I tried to make the old code you suggested me a little faster by doing this changes:Needs["JLink`"]Scanner[archivo_String, palabra_String] := JavaBlock@ Module[{entrada, linea, numlinea, contiene, ruta}, numlinea =...

Asked on 12/12/2020 by Mara Luisa Amada Tercero

1 answer

How can I rewrite this code to work for every $n$

I wanted to write this code in such a way that I run the whole thing for each $n$, and not write a1 a2 a3 or eq1 eq2 eq3...

Asked on 12/11/2020 by Ali AlCapone

1 answer

How to solve this DE?

I'm pasting a code of a DE.I'm getting error. Plz suggest correction.Clear[x];r=1;eqn=x'[t]-1-r*x[t]-(x^2)[t];sol=NDSolve[{eqn,x[0]==0},x,{t,0,100}][[1]];tTicks=Range[-24,24 30,24];tGrid=Range[-60,24 30,6];ParametricPlot[Evaluate[{x[t],x'[t]}/.sol],{t,0,100},Frame->True,FrameTicks->{tTicks,Automatic},FrameTicksStyle->Directive[Red,Thick],GridLines->{tGrid,Automatic},GridLinesStyle->LightGray,FrameLabel->(Style[#,14,Bold]&/@{x,Overscript[x,"."]}),AspectRatio->1]ParametricPlot[Evaluate[{t,x[t]/.sol}],{t,0,50},Frame->True,FrameTicks->{Range[0,50,12],Automatic},FrameTicksStyle->Directive[Red,Thick],GridLines->{tGrid,Automatic},GridLinesStyle->LightGray,FrameLabel->(Style[#,14,Bold]&/@{t,x}),AspectRatio->1]I made the correction regarding the syntax error. But still no execution. The following code,Clear[x];r=1;eqn=x'[t]-1-r*x[t]-x[t]^2==0;sol=NDSolve[{eqn,x[0]==0},x,{t,0,100}][[1]];tTicks=Range[-24,24...

Asked on 12/11/2020 by Rahul Chakraborty

1 answer

Select element in a multidimension list containing one element

Imagine that I have a list like:list={{{{1}}}}To access the number 1, I could do list[[1]][[1]][[1]][[1]] Of course it is very ugly but this is how I would do it...

Asked on 12/11/2020

3 answer

Eigen values of a third order linear homogenous ODE

From a system of PDEs where i used the following ansatz: $$theta_w(x,y) = e^{-beta_h x} f(x) e^{-beta_c y} g(y)$$. $F(x) := int f(x) , mathrm{d}x$ and ...

Asked on 12/11/2020

2 answer

Coloring the surface of a SphericalPlot3D using the image of a function $Phi (r,theta,phi)$

So the thing is I have a SphericalPlot3D of a Potential function and I want to color it considering the image of the function. The functions are:fA[r_, θ_, ϕ_]...

Asked on 12/11/2020

1 answer

Equation of Motion: Perturb Scalar Field and flat FLRW Metric (xAct)

Is there a way to get the equations of motion (eom) of a scalar field from a Lagrangian in a perturbed FLRW metric? I want to perturb the field as...

Asked on 12/11/2020 by kalle

0 answer

How do I define functionals in Mathematica?

When I write W[f_] := Integrate[f[x], {x, 0, π}] I may rightly conclude thatW[Sin] = 2, W[Cos] = 0, W[Log] = π (-1 + Log[π]) etc. But I...

Asked on 12/11/2020 by Quasar Supernova

4 answer

Ask a Question

Get help from others!

© 2024 TransWikia.com. All rights reserved. Sites we Love: PCI Database, UKBizDB, Menu Kuliner, Sharing RPP