From: AK on 28 May 2010 07:23 Hi, I was wondering if some kind-hearted soul could fix the following notebook for me, which was written for some older version (pre-2002) of Mathematica, so that it works with Mathematica 7: http://www.bmi2.bmt.tue.nl/image-analysis/People/BRomeny/publications/Computer Vision and Mathematica.zip alternate link: http://www.mediafire.com/download.php?mmu2myyenny It is available as a PDF paper as well: http://bmia.bmt.tue.nl/people/BRomeny/publications/Computer%20Vision%20and%20Mathematica.pdf I've so far only dabbled with a small subset of Mathematica on and off over the last couple of months, and have not used any version before 7, and for all I know what might take me hours to fix could be done by a pro in 10 or 20 minutes (at least, that's the hope). (I tried running the notebook without any changes, and with all of Mathematica's suggested changes, but didn't get very far.) Anyway, if it's asking too much, just ignore the request. I would also like to know how I could change the overall font size of the notebook as it's too big. TIA and regards, AK
From: Alexander Elkins on 29 May 2010 04:44 First and foremost note the existence of the book by the same author as the notebook, "Front-End Vision and Multi-Scale Image Analysis: Multi-scale Computer Vision Theory and Applications, written in Mathematica (Computational Imaging and Vision)" by Bart M. ter Haar Romeny, PhD (November 2003), Springer-Verlag, ISBN 1402015038 HardCover / 1402015070 PaperBack. The images you need for the notebook are: mr64.gif (5323 bytes) mr128.gif (18201 bytes) mr256.gif (62120 bytes) fundus256.gif (61227 bytes) us.gif (78283 bytes) These available individually as http://extras.springer.com/2003/978-1-4020-1507-6/AddOns/Applications/FrontEndVision/Images/*.gif Replace *.gif with mr64.gif, etc. as list above and download. The images are also available as part of the extras for the book listed above on its CD or online from http://bmia.bmt.tue.nl/Education/Courses/FEV/book/FrontEndVision2005.zip, Content-Length: 246216481, Last-Modified: Sun, 06 Nov 2005 15:21:28 GMT. As to additional changes needed to make the notebook to work in version 7: As of version 6, importing a GIF file produces different results: Change: im=Import["mr64.gif"][[1,1]]; into: im=Reverse[Import["mr64.gif"][[1]]/.{g_Integer, g_Integer,g_Integer}:>g]; In the older versions 4 & 5, ListPlot3D is different: ListPlot3D[array, shades] generates a plot with each element of the surface shaded according to the specification in shades. So my best guess for now is: Change: Graphics3D[ListPlot3D[array, shades, otheroptions]] into: ListPlot3D[array, VertexColors->{shades}, otheroptions] More than 10 minutes work is needed... Alexander Elkins "AK" <aaarbk(a)gmail.com> wrote in message news:hto932$ksf$1(a)smc.vnet.net... > Hi, > > I was wondering if some kind-hearted soul could fix the following > notebook for me, which was written for some older version (pre-2002) > of Mathematica, so that it works with Mathematica 7: > http://www.bmi2.bmt.tue.nl/image-analysis/People/BRomeny/publications/Computer > Vision and Mathematica.zip > alternate link: > http://www.mediafire.com/download.php?mmu2myyenny > > It is available as a PDF paper as well: > http://bmia.bmt.tue.nl/people/BRomeny/publications/Computer%20Vision%20and%20Mathematica.pdf > > I've so far only dabbled with a small subset of Mathematica on and off > over the last couple of months, and have not used any version before > 7, and for all I know what might take me hours to fix could be done by > a pro in 10 or 20 minutes (at least, that's the hope). > (I tried running the notebook without any changes, and with all of > Mathematica's suggested changes, but didn't get very far.) > > Anyway, if it's asking too much, just ignore the request. > > I would also like to know how I could change the overall font size of > the notebook as it's too big. > > TIA and regards, > AK >
|
Pages: 1 Prev: Eric weisstein's MathWorld packages Next: Trying to do some stuff with JLINK ??? |