[Date Index]
[Thread Index]
[Author Index]
Re: What to do in v. 6 in place of Miscellaneous`RealOnly
*To*: mathgroup at smc.vnet.net
*Subject*: [mg77088] Re: What to do in v. 6 in place of Miscellaneous`RealOnly
*From*: Jean-Marc Gulliet <jeanmarc.gulliet at gmail.com>
*Date*: Sun, 3 Jun 2007 06:09:35 -0400 (EDT)
*Organization*: The Open University, Milton Keynes, UK
*References*: <f33ork$l7l$1@smc.vnet.net> <f36go3$9rf$1@smc.vnet.net> <200705260842.EAA18740@smc.vnet.net> <200705270852.EAA03263@smc.vnet.net> <6063CBD7-7FB9-4719-90F7-DE917481A78E@earthlink.net> <f3gpr5$3m5$1@smc.vnet.net>
Murray Eisenberg wrote:
> Will such an Import handle correctly contexts from an "ordinary" package?
Yes. See at the bottom of the message for the location of a test package
and some Mathematica version 6.0 commands.
> (The web server I use for most things is out of service at the moment,
> so I cannot test that.)
>
>
> Selwyn Hollis wrote:
>> Apparently, it's now possible to load a package from a remote location
>> on the web.
>>
>> I put a simple init.m file that defines a function HexToDecimal at this
>> url:
>>
>> http://www.math.armstrong.edu/faculty/hollis/init.m
>>
>> Entering this quietly loads it:
>>
>> Import["http://www.math.armstrong.edu/faculty/hollis/init.m";]
>>
>> For verification, enter this:
>>
>> ?HexToDecimal
>>
>> Stunning.
>>
>>
>> - Selwyn
>>
>>
>> On May 27, 2007, at 4:52 AM, Murray Eisenberg wrote:
>>
>>> You've stumbled upon a long-standing problem I've faced with using
>>> Mathematica in an academic setting (or perhaps any setting) where
>>> systems are locked down by the folks whom maintain the systems: how to
>>> handle 3rd-party add-on packages.
>>>
>>> In my own experience, getting the packages installed on the students'
>>> own machines is not that big a deal provided the zip file (or whatever)
>>> is properly assembled and the instructions are sufficiently clear and
>>> the students are able to follow direction. (Hmm...the last IS a bit of
>>> a problem: if only students read directions as carefully as I wrote
>>> them!)
>>>
>>> The real problem resides with lab & classroom computers. Given
>>> sufficient advance notice, of course, such packages can be incorporated
>>> into the standard software on the systems. (At my own institution, any
>>> package needed for the September semester needs to be in the hands of
>>> the IT folks no later than July 1, and preferably earlier; for the
>>> Spring semester, no later than Thanksgiving. This is a real pain.)
>>>
>>> I don't have a good solution to this. Perhaps somebody at Wolfram
>>> Research will look into it.
>>>
>>> Helen Read wrote:
>>>> dimitris wrote:
>>>>> Hi Helen.
>>>>>
>>>>> I don't have version 6 but in case you don't know
>>>>> there is a much more flexible package named
>>>>> SwitchableRealOnly by Ted Ersek available at
>>>>>
>>>>> http://library.wolfram.com/infocenter/MathSource/560/
>>>> I'll have a look at that, but I'm not keen on using a package that the
>>>> students would have to download and install themselves. (They use
>>>> Mathematica on their own laptops and in computer labs all over campus,
>>>> not just the classrooms maintained by the math department.)
>>> --
>>> Murray Eisenberg murray at math.umass.edu
>>> Mathematics & Statistics Dept.
>>> Lederle Graduate Research Tower phone 413 549-1020 (H)
>>> University of Massachusetts 413 545-2859 (W)
>>> 710 North Pleasant Street fax 413 545-1801
>>> Amherst, MA 01003-9305
>>>
>
I have put a test notebook at
http://homepages.nyu.edu/~jmg336/mathematica/Sierpinski.m
As you can see below, the context JMGTests`Sierpinski` is correctly
created. Very cool feature indeed.
In[1]:= $ContextPath
Import["http://homepages.nyu.edu/~jmg336/mathematica/Sierpinski.m";]
$ContextPath
?JMGTests`Sierpinski`*
drawCarpet[4]
Out[1]= {"PacletManager`", "WebServices`", "System`", "Global`"}
Out[3]= {"JMGTests`Sierpinski`", "Utilities`URLTools`", "JLink`", \
"PacletManager`", "WebServices`", "System`", "Global`"}
drawCarpet[n] draws the Sierpinski's Carpet
[graphic deleted]
Regards,
Jean-Marc
P.S. Here is the code of the package. (Not breathtaking, for sure, but
it works well for illustrative purpose.)
(* ::Package:: *)
BeginPackage["JMGTests`Sierpinski`"]
drawCarpet::usage="drawCarpet[n] draws the Sierpinski's Carpet"
Begin["Private`"]
rules = {0 -> {{0, 0, 0}, {0, 0, 0}, {0, 0, 0}},
1 -> {{1, 1, 1}, {1, 0, 1}, {1, 1, 1}}};
f[m_:1] := ArrayFlatten[m /. rules]
drawCarpet[n_Integer?Positive] := MatrixPlot[Nest[f, 1, n], FrameTicks
-> None]
End[]
EndPackage[]
Prev by Date:
**Re: Problem with Mathematica 6**
Next by Date:
**unevaluated expression**
Previous by thread:
**Tom Wickham-Jones presents: Mathematica ReInvented**
Next by thread:
**Re: Re: What to do in v. 6 in place of Miscellaneous`RealOnly**
| |