Reputation
Top tag
Next privilege 1,000 Rep.
See votes, expandable usercard
Badges
3 14
Newest
 Custodian
Impact
~5k people reached

5h
comment Table with List iterator return unpacked list
Interesting. One could turn on On["Packing"] to see the warning if unpacking happens so as to manually apply ToPackedArray though.
6h
comment Schrödinger equation for Hydrogen atom
related
Feb
5
comment How to refer a number in a list with two columns, first one is a number and the second one is empty?
Select[list, NumberQ[#[[2]]] &]
Feb
5
comment How define shortcuts to specific OptionInspector points?
Dynamic[counter, SaveDefinitions -> True] may save the counter; but bear in mind SaveDefinitions is considered a bit dangerous here.
Feb
5
comment How to generate two group of $n$ random numbers in $U(0,1)$ such that sum of these two groups equal?
this, and do a rescale maybe?
Feb
5
comment How define shortcuts to specific OptionInspector points?
I think SelectedCells refers to the cell with the input cursor, or selected via the bracket at the right side of the cell.
Feb
5
comment How define shortcuts to specific OptionInspector points?
This will make a button that sets the label to values specified by t. maybe you can use KeyEventTranslations.tr to make a shortcut for it. t = {"a", "b", "c", "d"}; Button["cell frame", SetOptions[SelectedCells[InputNotebook[]][[1]], CellFrameLabels -> {{t[[1]], t[[2]]}, {t[[3]], t[[4]]}}]]
Feb
5
comment I want to plot a list of points with specified t and x[t] coordinates
ListPlot[Table[{Subscript[t, i], x[Subscript[t, i]]}, {i, 0, 2, 1}], Filling -> Axis] works. Typo (i runs through 0 to 2, not t)?
Feb
2
comment keyboard shortcut to invoke Insert new matrix
thanks! and sorry for the singlelaunch trouble
Feb
2
comment keyboard shortcut to invoke Insert new matrix
@JasonB works for me, thanks a lot! maybe offer it as an answer and I'll accept?
Feb
2
comment keyboard shortcut to invoke Insert new matrix
@JasonB Yes, I'm aware of that. I can programmatically do the fill all and fill diagonal function in the dialogue box, but the lines between the rows and columns are really nice for my needs and I can not reproduce that without clicking the menu item.
Feb
2
comment ParametricPlot3D crashes Kernel when called repeatedly in loop
can you try suppressing the output via ;, assign a name to the plot (e.g. with a For[] loop), and export them instead of displaying them in the notebook?
Feb
2
comment Combining two list function (Is it the best way?)
refer to 4994, 61638
Feb
1
comment Prevent Dynamic from behaving dynamically until notebook evaluated
Dynamic[If[ValueQ[a], a[[2]], {}]] gives {} instead of error, is that good enough?
Feb
1
comment How to plot linear term of a function expanded by Taylor seires in Mathematica?
I could be wrong but I think Series[] needs a symbolic expression and here you have a numeric one. I think Debye[] has a closed analytic expression, and you can work from there
Feb
1
comment How to plot linear term of a function expanded by Taylor seires in Mathematica?
According to the documentation, you should use Normal[] to make the expression returned by Series[] work.
Feb
1
comment replacing complex numbers
ReplaceAll[a, {Complex[0, 1] :> H, Complex[0, -1] :> -H}]
Jan
29
comment Deciphering Coding Shortcuts
It does not strictly "return the first value of a list": it just returns the first argument to the function following @@, for lists, the full form is List[x,y,z], and the 1st argument is x, which is also the first value of a list. Try # & @@ func[c, b, a]
Jan
29
comment RegionPlot with Rotated Insets are Unreadable
@Guillochon you may also have some luck with matex since the expression generated by that tool is from pdflatex.
Jan
29
comment RegionPlot with Rotated Insets are Unreadable
Yes, but since both are the same position/style, they appear as one.