Mathematica

在模擬大量隨機值時，我偶然發現了一個奇怪的問題， $ 10 ^ 8 $ 。我首先通過以下代碼生成了數字：\[Alpha]=0.2; levytab2 = {}; While[Length[levytab2] < 10^8, Clear[u1, u2]; u1 = RandomVariate[UniformDistribution[{0, 1}]]; u2 = RandomVariate[UniformDistributio...

random date-and-time simulation timing 

我正在做一個需要解決ODE的項目。 。我嘗試使用DSolve來解決它，但它給了我一個答案，但是我不確定如何解釋它。我正在使用的代碼在這裡：epsilon = .5 tau = 1 DSolve[ y'[t] == (2*Pi*(1 + epsilon*Cos[y[t]])^2)/(tau*(1 - psilon^2)^(3/2)), y[t], t]` ...

differential-equations syntax 

我使用以下代碼從圖像中獲得了擬合模型：kguess = 3; nguess = 1; data = {{0.010000000000000004`, 0.`}, {0.029999999999999995`, 0.1835304721030043`}, {0.10000000000000002`, 0.49498712446351933`}, {0.3`, 0.8998025751072961`}, {10.000000000000002`, 0.9641931330472102`}, {100...

equation-solving fitting nonlinear 

FrameTicks的一個簡單函數在使用10的大功率時會返回內存錯誤。fticks = Table[{j, [email protected], {0.2, 0.}}, {j, PowerRange[10.^Floor[Log10[Exp[#1]]], Exp[#2]]}] &; LogLogPlot[10^x, {x, 9, 11}, Frame -> True, FrameTicks -> {{fticks, None}, {Automatic, None}}] ...

plotting memory ticks 

我試圖在不同的地方解決Upm / Um，但是沒有任何結果。我的雙曲函數有問題嗎？請幫助我獲得結果。將不勝感激。t = 0.3; Da = 10^-4; ϵ = 0.9; A1 = Da + t^2/2 - Da Sech[((-1 + t) Sqrt[ϵ])/ Sqrt[Da]] - (Sqrt[ Da] t Tanh[((-1 + t) Sqrt[ϵ])/ Sqrt[Da]...

equation-solving trigonometry 

P0={0,0}; P1={1,0}; P2={-1,0}; P3={0,1}; P4={1,-1}; P5={-1,-1}; Framed[Show[Region[ConvexHullMesh[{P0,P1,P3},MeshCellStyle -> {2 -> Opacity[0.5, Red]}],PlotRange->{{-1.1,1.1},{-1.1,1.1}},Axes->True,LabelStyle ->{14,Bold}, ImageSize->Medium],Region[ConvexHullMesh[{P0,P3,P4},MeshC...

color mesh intersection 

函數 Sin [2 x] 與 Cos [2 x] 的列表圖，當x為實數且x為隨機變量時？圖中相位的影響是什麼？...

plotting list-manipulation 

我正在使用Legendre多項式（及相關多項式）。當我進行以下計算時：Table[Integrate[LegendreP[k, 0, Cos[η]] * Sin[η], {η, 0, Pi}], {k, 0, 10}] 我嘗試了k的一個特定值來查看計算時間：Timing[Integrate[LegendreP[k, 0, Cos[η]] * Sin[η], {η, 0, Pi}] /. k -> 0...

calculus-and-analysis special-functions 

考慮 $ P：A \ to [0,1] $ 其中 $ A \ subseteq [0,1]$ 。假設 $$ A = \ left \ {\ frac {1} {2 ^ x} + \ frac {1} {2 ^ y} + \ frac {1} {2^ z}：x，y，z \ in \ mathbb {Z} \ right \} \ cap [0,1] $$ 和 $ [0,1] $ 的分區是一個序列 $ x_i $ 其中 $$ 0 = x_0 \ le x_1 \ le ... \ le x_n = 1 $$ ...

plotting summation inequalities 

我檢查了網站，但沒有找到類似的話題，所以我決定問。我解決了幾個最大化問題，並獲得了x，y，z和k的解。我需要做的是在方程組中求解它們。現在，唯一的問題是x，y和k分別有兩個解，所以我有8個可能的方程組。我應該做...

equation-solving 

我想知道是否可以找到多邊形的內部區域的等式，該多邊形的內部尺寸已被重新縮放。例如：十二面體的分析區域基於：PolyhedronData [ Dodecahedron , RegionFunction ] [x, y, z] 如果我繪製十二面體方程：With [{r = 5}, RegionPlot3D [PolyhedronData [ ...

regions polyhedra 

我在Mathematica中有以下代碼：https://pastebin.com/zRB9vEx8 ，我需要使用給定參數計算橢球的體積： $$ \ frac {x ^ 2} {9} + \ frac {y ^ 2} {4} + \ frac {z ^ 2} {4} = 1 $$ 任何人都可以使用以上代碼給我任何建議嗎？...

simulation random 

我正在嘗試使用SystemModel模擬大型空調系統，但是當我嘗試將自定義模型相互連接時，我的內核有時會崩潰。即使內核沒有崩潰，ConnectSystemModelComponents在我的筆記本電腦上也要花費一個多小時。為了說明問題，這是一個簡單的示...

differential-equations performance-tuning system-modeler 

讓我們定義一個非常簡單的圖 並詢問其FullForm： 太好了。除了不同於其他我嘗試過FullForm的情況，這實際上並不是Mathematica對該圖的內部表示。當然，如果我嘗試MatchQ[g, _Graph]，我會得到True。但是如果我嘗試MatchQ[g, Graph[__]，我會...

graphs-and-networks fullform 

我具有F[x][y][z] == F[x][z][y] == F[-x][-y][-z]類型的功能。我正在製作一個包含所有可能值的表格，如Table[F[i][j][k], {i,{±1,±2,±3}, {j,{±1,±2,±3}, {k,{±1,±2,±3}]. 該函數本身需要花費大量時間來計算。我有什麼辦法可以利用這些對稱性？非...

function-construction 

AbsoluteOptions在PlotPoints上不能很好地工作，例如：AbsoluteOptions[ Plot3D[Sin[x y], {x, 0, 2}, {y, 0, 2}, Mesh -> All, MaxRecursion -> 1], PlotPoints] 已知錯誤？...

graphics options 

我有一組從0到9的數字numbers=Range[0,9,1] 我想確定0到9之間的三個數字的組合。通過以下條件，可以得出正確的組合： 1-在正確位置有一個真實數字 condition1={6,8,2}; Permutations[condition1] {{6,8,2},{6,2,8},{8,6,2},{8,2,6},{2,6,8},{2,8,6}} 2-但是...

combinatorics 

首先，我為以下方程式/條件創建了以下傅立葉級數： $$ f（t）= \ begin {cases} 0，＆0 ...

plotting functions fourier-analysis piecewise 

我正在嘗試求解以下微分方程，但是Mathematica似乎沒有給出答案。你們對如何使這項工作有任何線索嗎？DSolve[{y''[x] == Sinh[y[x]]}, y[x], x] 謝謝！...

differential-equations 

以下代碼無法將每個方程式乘以dt，因為dt似乎沒有任何作用。它仍然是一個共同的因素，我希望它取消1 / dt項，並將其餘的乘以dt。eqns = {x1'[t] == (\[Mu] - (x1^2 + x2^2)) x1 - x3x2 + Ksin + \[Sigma]dw/dt, x2'[t] == (\[Mu] - (x1^2 + x2^2)) x2 + (x3x1)...

matrix algebraic-manipulation