TransWikia.com
  1. All Categories
  2. Mathematica

Mathematica : Recent Questions and Answers (Page 10)

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

Using Regular Expression

sample2 = "this is a test to find whether pi works for other words or not as well pi pi pi potatpi pineapple pi-neapple";so sample2 is a string, and...

Asked on 10/22/2021

2 answer

Integrating twice gives a different result than a double integral

I would like to compute the following double integral:$$int_{-1/2}^{0}int_{-v}^{1+v} frac{2}{1-(u^2-v^2)} dudv = frac{pi^2}{12}$$When I do this using usingIntegrate[2/(1 - (u^2 - v^2)), {v, -1/2,...

Asked on 10/22/2021

3 answer

Drag and lift force acting on an airfoil

To calculate force acting on an airfoil we can use FEM with version 12 and over. Here we show an example with NACA2415. First we calculate mesh and potential flow:...

Asked on 10/22/2021

2 answer

How to use each replacement only once in a list of replacements

I have a list of replacements and some list they are acting on. However, some RHS of the replacements rules are identical (the LHS is not). I want to use...

Asked on 10/22/2021

4 answer

Changing the color of the animate box

Is there a way to change the coloring of the boxes that are generated by Animate or Manipulate? The color of what is gray by default.Animate[ArrayPlot[CellularAutomaton[n, {{1}, 0}, {40,...

Asked on 10/22/2021

1 answer

Help to create a 2D mesh generator (FEM)

I'm working in a finite element mesh generator. I built this function which generates an 8 node mesh (polynomials of order 2) without any interior node: ...

Asked on 10/22/2021

1 answer

Accelerate the speed of selection in Random

Tossing 4 points on a circle at a time, and calculate the chance of all 4 points on the upper part of the circle. ...

Asked on 10/22/2021

2 answer

Bad linear fit for simple data

I have some data :data={{1.01074, 0.964488}, {1.08552, 0.993067}, {1.07907, 1.01836}, {1.0477, 1.03695}, {1.07717, 1.07973}, {1.10243, 1.08195}, {1.12669, 1.09112}, {1.09405, 1.09319}, {1.10857, 1.08445}, {1.18604,...

Asked on 10/22/2021

4 answer

Strange behaviour in ToElementMesh

Why would that not work:L = 20;h = 1;Needs["NDSolve`FEM`"]gr = Graphics3D[Cuboid[{-h/2, 0, -h/2}, {h/2, L, h/2}]]mesh = ToElementMesh[DiscretizeGraphics[gr], "MeshOrder" -> 1](* TetGenTetrahedrize: returned error, 2 *)when with a simple...

Asked on 10/22/2021

1 answer

DateDifference inconsistency - feature or bug?

The following code attempts to measure the difference in months between the last day of a year and the first day of a month in the following year. QuantityMagnitude@DateDifference[{2018, 12,...

Asked on 10/22/2021

1 answer

Ask a Question

Get help from others!

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