57,878 reputation
887205
bio website none
location Argentina
age
visits member for 2 years, 9 months
seen 15 mins ago

Code for my breathing avatar here


You may contact me at: BelisariusForSO@gmail.com

But please don't email me with requests about Q&A. Post them in the site instead.

Infix should be used only where it is essential... like in "feliz año nuevo" @rm-rf


Jan
27
answered Find partial derivatives when the number of variables is unknown
Jan
27
comment Pairwise distances of points and classification using GraphDistanceMatrix
@user11977 Docs are here reference.wolfram.com/mathematica/tutorial/UsingNearest.html
Jan
27
answered Pairwise distances of points and classification using GraphDistanceMatrix
Jan
27
revised Plotting time data with axes labels and point labels
added 370 characters in body
Jan
27
comment GridGraph layout with added edges
Please show your use case (how do you want to build the weighted graph)
Jan
26
revised Draw grid lines at multiples of k
deleted 6 characters in body
Jan
26
answered Draw grid lines at multiples of k
Jan
26
comment Extract the generating curves from a Graphics3d returned from RevolutionPlot3D
@xzczd Ha! "Learning Chinese by induction" :)
Jan
26
comment Extract the generating curves from a Graphics3d returned from RevolutionPlot3D
@xzczd Does for example "generating function" follows the same name convention in Chinese? (just curiosity)
Jan
26
comment Recognize simple shapes in an image and color them randomly?
A simple first approach could be p = Graphics[ Polygon[Table[PolarCoordinate[i^10, i*sunflower], {i, 1, 500}]], ImageSize -> 1000]; MorphologicalComponents[ColorNegate@Dilation[p, 2], CornerNeighbors -> False] // Colorize
Jan
26
accepted Any ideas on how to use the Region` context?
Jan
26
answered Plotting time data with axes labels and point labels
Jan
26
comment Plotting time data with axes labels and point labels
DateListPlot[data, Joined -> True, DateTicksFormat -> {"MonthShort", "/", "Day", " ", "Hour", ":", "Minute"}, FrameTicks -> {{Automatic, False}, data[[All, 1]]}, PlotRange -> {Automatic, {1, 12}}, Epilog -> {Red, PointSize[Medium], Point@data, Text[Style[#[[2]], 15], # + {0, 1}] & /@ data}, PlotRangePadding -> {4000, 10}] Results in !Mathematica graphics
Jan
26
comment Plotting time data with axes labels and point labels
Perhaps you could include a drawing of your desired output
Jan
24
comment How to properly substitute values into variables?
@Peltio The point was left as an exercise to the reader .)
Jan
24
answered Avoiding RandomVariate update with use of Locator
Jan
24
comment Labelling objects in a picture with numbers
BTW, please specify whether this is homework or not (sounds like it)
Jan
24
comment How to properly substitute values into variables?
perhaps just q3 = s / a :> p
Jan
24
revised How to properly substitute values into variables?
added 28 characters in body
Jan
24
comment Problem with Plot of Solution for NDSolve
And the imaginary part isn't negligible ...