41,661 reputation
562169
bio website
location
age
visits member for 2 years, 6 months
seen 1 hour ago

1h
comment Creating a foggy image
Very nice. Maybe add a bit of white for scattering of ambient light? ImageApply[0.7 # + 0.3 &, foggy]
9h
comment Elementwise operation, part deux
@IgorRivin, for a version of Scan with a generator expression instead of a list, have a look at Do ;-)
11h
comment Counting number of trues in If condition inside a For loop
It works just as well without the DeleteCases
1d
answered Mathematica spitting code back when using Resolve over a large range of interest
1d
comment Fractal dimension of a large networked molecular system
When you have two distinct questions it is generally better to ask them separately. The site is easier for people to use that way (eg a future user looking for how to visualize secondary structure might overlook a question which appears to be about fractal dimensions). Also, you can only accept one answer, so what will you do if you get awesome but separate answers to both questions?
1d
comment calling CUDA library functions
This looks great. CUDALink is broken (again) on my home PC but I'll test it at work on the Quadro 4000 tomorrow.
1d
comment Exporting images as .avi
It might be worth adding a note that one can use ConformImages to do the conversion in version 10
2d
comment How to plot a Circles-and-Squares fractal
@BoC., sorry I don't quite understand what you're asking. You would have to do some analysis to see why the circles are the sizes they are.
2d
comment How can I restore the old `ImageCompose` behaviour?
This solution seems robust - I can't find a way to break it! And it's faster (and probably more accurate) than post-processing the result from broken ImageCompose. Thanks again.
2d
accepted How can I restore the old `ImageCompose` behaviour?
2d
comment How to plot a Circles-and-Squares fractal
@MichaelE2, love it! Try this one: {b,h}=Rescale@#@results[[3]]&/@{Abs,Arg}; Image[{h,1-0b,1-b},Interleaving->False,ColorSpace->"HSB"]
2d
answered How to plot a Circles-and-Squares fractal
2d
awarded  Nice Question
2d
comment Using Permutations to create numbers
+1 Nice. You could count count in twos and eliminate the EvenQ test for even shorter code Select[Range[0,999,2],#⋂0~Range~5==Sort@#&@*IntegerDigits]
Sep
19
comment How can I restore the old `ImageCompose` behaviour?
Many thanks for the suggestion. The Export-Import conversion seems to remove the alpha channel though. However I can rasterize direct to Image and maintain the alpha channel using Rasterize[Overlay[{i1, i2}], "Image", Background -> None]. I have some tests to run but this looks good so far.
Sep
19
comment Export notebook as epub?
I would add that if a command line converter is available it could be called from Mathematica using Run
Sep
19
comment Creating a three dimensional fullerene molecule
The output from the built-in MoleculePlot is just a Graphics3D expression with spheres for the atoms and cylinders for the bonds. So use something like % /. {c_Cylinder :> Style[c, Red], s_Sphere :> Style[s, Blue]}
Sep
19
comment How to plot a Circles-and-Squares fractal
No doubt there are more concise ways but try With[{r = Range[-50, 50]^2}, Image@Rescale@Mod[Outer[Plus, r, r], 100]]
Sep
19
awarded  Generalist
Sep
18
asked How can I restore the old `ImageCompose` behaviour?