Reputation
919
Next privilege 1,000 Rep.
See votes, expandable usercard
Badges
4 14
Newest
 Yearling
Impact
~5k people reached

  • 0 posts edited
  • 0 helpful flags
  • 63 votes cast
Mar
15
comment How to batch convert a directory of images to thumbnails?
ParallelDo?
Mar
1
comment Connect points in List plot by individual specification
you can specify the points to connect as a sequence, eg. ListLinePlot[data[[{1, 5, 2}, 2 ;; 3]]] to connect point 1 with 5, 5 with 2.
Feb
22
comment Is it possible to make a standalone OS X app from manipulate?
maybe CDF is the closest option.
Feb
17
comment How to get DateListPlot Epilog to display shapes
Seems like the big number is due to date converted to AbsoluteTime, i.e. seconds since January 1, 1900: DateString[3.36865*10^9] is Sun 1 Oct 2006 00:06:40, the first data point.
Feb
17
comment Different Mesh lines and styles in the same plot
Mesh -> {{Sqrt[(8 n + 3)/ 2]}, {6^.25}}, MeshFunctions -> {#1 &, #2 &}, MeshStyle -> \ {{Thick, Cyan}, {Thick, Red}}
Feb
15
comment Select positive elements from a list of solutions
name your solution as sol, then Select[Table[{H, h} /. sol[[i]], {i, 1, Length[sol]}], Im[#[[1]]] == 0 && Im[#[[2]]] == 0 && Re[#[[1]]] >= 0 && Re[#[[1]]] >= 0 &]
Feb
15
comment Highlighting Mathematica code in $\LaTeX$ document
you can always save .nb file in pdf and use this
Feb
11
comment How to reconstruct a given schematic picture from color image
@garej btw, if you may also be interested in using this
Feb
10
comment Table with List iterator return unpacked list
@matheorem the inner/outer iterator detail by @Daniel Lichtblau can be easily verified: Table[w + ky, {w, 1., 10., 0.01}, {ky, Range[1., 10., 0.01]}] is not packed; Table[w + ky, {w, Range[1., 10., 0.01]}, {ky, 1., 10., 0.01}] is packed
Feb
9
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.
Feb
9
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.