2,268 reputation
2516
bio website
location Ireland
age
visits member for 1 year, 5 months
seen 6 hours ago
stats profile views 173

Jun
13
comment Why are my plots displaying behind the axes?
This post by Verbeia might also be of interest.
Jun
10
comment Modify all the second elements of every pair in a list of pairs
Another slight variation (but hardly more natural either): MapAt[Standardize, #\[Transpose], 2]\[Transpose] &@mylist
Jun
4
comment Match sequence of zero or more characters except a given character
Do you require something like (StringMatchQ[#, ___ ~~ "i" ~~ ___ ~~ "o" ~~ ___] && StringFreeQ[#, ___ ~~ "i" ~~ ___ ~~ "i" ~~ ___]) & /@ {"histology", "adventitious"}. Or maybe Short[Pick[#, StringFreeQ[#, ___ ~~ "i" ~~ ___ ~~ "i" ~~ ___] & /@ #] &@ DictionaryLookup[___ ~~ "i" ~~ ___ ~~ "o" ~~ ___], 10]
May
17
comment Plot data from txt file?
@suzy. I am not sure I have fully understood your question. However... If, say, data = {{0, 0, 0}, {1, 20, 100}, {2, 40, 200}, {3, 60, 300}} and I would like to plot column 1 versus colum 2 AND (on the same graph) column 1 versus columm 3, I could do that as follows: ListLinePlot[ Transpose /@ {{data[[All, 1]], data[[All, 3]]}, {data[[All, 1]], data[[All, 2]]}}, PlotMarkers -> Automatic, PlotStyle -> {Red, Green}]. Perhaps you were thinking of something different to ListLinePlot?
Mar
20
comment Position with Except returns first item {0} and last item {}. Why?
Or, perhaps, Position[l, Except[0, _?NumericQ]] == Position[l, Except[0, _Integer]]
Feb
28
revised How to 'merge' a list like FromDigits, but with a mixture of numbers and symbols?
added output to example 2
Feb
28
revised How to 'merge' a list like FromDigits, but with a mixture of numbers and symbols?
removed quotation marks from sample output
Feb
28
answered How to 'merge' a list like FromDigits, but with a mixture of numbers and symbols?
Feb
27
answered How can I Flatten this List with Inner List of Lists?
Feb
26
comment Mathematica vs Sigmaplot (Non LinearModelFit)
Are you sure your exponential function is a0*Exp[a1 t + a2 t^2] and not, say, a0*Exp[-(a1 t + a2 t^2)]?
Feb
26
comment Mathematica vs Sigmaplot (Non LinearModelFit)
Maybe nlm = NonlinearModelFit[data, func, {{a0, 10}, {a1, 0.01}, {a2, 0.0001}}, t]; Show[ ListPlot[data, PlotStyle -> Directive[Blue, PointSize[Large]]], Plot[nlm[t], {t, 220, 255}], Frame -> True] and nlm[{"BestFit", "ParameterTable"}]
Feb
24
answered Properly Force Mathematica to Simplify Log Expressions/Rules
Feb
22
awarded  list-manipulation
Feb
21
revised Find list position and mapping list
deleted 10 characters in body
Feb
21
answered Find list position and mapping list
Jan
30
answered Use of MinimumSpanningTree
Jan
29
comment Use of MinimumSpanningTree
Woring within the Combinatorica package with Mma 7, Needs["Combinatorica"]` ShowGraph@MinimumSpanningTree@PetersenGraph and NumberOfSpanningTrees@PetersenGraph => 2000
Jan
27
comment Why doesn't FullSimplify get rid of the common factor in this expression?
Maybe FullSimplify[Expand@(E^(-I x) y z + (1 + E^(I y)) (x + y) z)/z, z != 0]?
Jan
27
revised How to convert a hex color string to RGBColor?
deleted 65 characters in body
Jan
26
revised How to convert a hex color string to RGBColor?
StringTrim used instead of StringDrop