Another way, at least for the simple example of y=x^2, would be to plot it in 3d using spacecurve and orient the axis the way you want with orientation.

with(plots):
spacecurve([t,t^2,0],t=-10..10,color=red,axes=normal,labels=[x,y,z],orientation=[90,0])

You shouldn't have to move the text file.  If you specify the exact location as when you explore your c drive and use that destination in quotes it should work fine.  Make sure it's exact though, correct spaces and capitals as you know. 

As Joe showed above just use the path to your textfile on the c drive to your desktop. 
More explicitly

a:=readdata(`c:/Documents and Settings/All Users/Desktop/be.txt`,2):

This sounds like you want to keep the coding of your worksheet private.  Doesn't sound like there's any functionality to it as you said you just want the user to just read the worksheet so then why not just save your worksheet as a pdf and upload that ?

Using RSA you could have a second set of encoding and decoding keys.  Just distribute your 2nd decoding key with your 2nd encoded name within your message encoded with your first key.  Then they will have the means to decode your name and know it is from you, however they can not encode one because only you know the 2nd encoding key. 

I wouldn't worry about that.  Maple will be around for a long time.  Ironically after Stephanie replied to my question she happened to be on the list employees let go. 

Maybe the name will change but I don't think so, Maple has a great reputation.  There are a great many number of institutions using Maple and a lot of professors who stand by it.  Also the investment in the MapleSim project is huge.  The Japanese company will build on the product. 

Maple will certainly be around for a while, it's not going to dissappear anytime soon.

Okay I've been able to figure out how to fill another TextField with an initial textfield by pushing a button but it appears that you cannot do that with ListBox

> with(Maplets[Elements]);

> maplet := Maplet([[TextField['TF'](20)], [TextField['TF1'](20)], [Button("update", 'onclick' = 'A1')]], Action['A1'](SetOption('target' = 'TF1', Argument('TF'))));

> Maplets[Display](maplet);

Another thing is that if Listbox contains text that is too large to fit on your screen those selection options will never be seen although they do exist.

I'm trying this,

with(Maplets[Elements]):

maplet:=Maplet([[ListBox_A(FileTools:-ListDirectory("c:/")),ListBox_B( [ ] ) ]] ):

Maplets[Display](maplet)

So I'm trying to have two ListBoxes in the maplet side by side, the second one is empty until I select one of the entries from the first box.  Basically the selection of ListBox[A] puts the contents of it's directory into ListBox[B] but I'm not sure how to do it and I'm having trouble trying to figure it out. 

Any ideas?

Thanks.  I was thinking of mimicking the classic maple help similar to this except using file directories as top levels in a tree.

If I understand correctly you have directory pathnames in the first column of a textfile which have the backslash format instead of the forward slash. 

You could just use replace in the text file itself from notepad and replace all / to \ but I'm thinking you want Maple to change the backslashes to forward slashes for you?

Be nice to get a quad core computer but I'm still pretty comfortable and happy with my current one for the time being.  Closing in on the 5 year mark I should probably think about backing up my files.  So in principle a P2 could run millions of points smoothly?  That would point to memory hungry routines in the GUI then, which is where I like to do most of my work.  I upgraded the memory and added a new h.d. last year and I have no plans to upgrade them again.  I might at most plan to spend $100-$150 to upgrade my video card but that would be it for upgrading this one.  Interesting though about the hardware being capable but Maple software lacking or lagging in speed? 

And I never thought about updating Java.  I'm using version 6 update 7 and the most recent is update 22, I guess I'm a bit behind the times in the software upgrade.

I wonder if updating the Java would really help that much? 

But if even a fast computer bogs down, then I needn't worry.  I'll try the classic first.

Luckily I have located replies from my old mapleprimes database and will replicate them here.

2 Replies

Maple Challenge 2
"by : Robert Israel commented on 2007-12-25 17:06 "

If I understand you correctly, you want your function f to solve the system of inequalities (x-t)^2 + y^2 < 1, t > 0, t < T (where T is some given numeric constant > 0). You can do it (for numeric values of x and y) with

> f := (x,y) ->
    solve({(x-t)^2 + y^2 < 1, t > 0, t < T}, t);
I was somewhat disappointed to see that this would not work with symbolic x, y. But with a little thought you can define it by hand:

> f := (x,y) -> piecewise(abs(y) <1,  
      RealRange(Open(max(0,x-sqrt(1-y^2))),
        Open(min(T,x+sqrt(1-y^2)))),
      NULL);

Second reply

The order of Evaluation may be your problem
"by : jaytreiman commented on 2007-12-27 1600 "

Try defining a function like that below. It does the trick for a disk.
Similar functions may work for what you are doing.

f := proc(x,y)
eqn1 := eval(subs({x1=x,y1=y},(x1-t)^2 + y1^2 <= 1));
solve(eqn1,t);
end proc;

This post is broken,

@Will  - Please fix.

There must be something up with your datafile because Maple 10 should be able to handle it no problem. 

With Maple 10, I created 5500 random points and plotted them.  Like this.

with(plots):
a:=[seq(rand(0..90)(),rand(900..3000)(),rand(0..90)()],i=1..5500)]:

pointplot3d(a)

That works fine.  Next I created some random numbers in Excel 3 columns and just selected crtl-c and crtl-v into a notepad file and saved it as sample.txt but renamed it sample.dat to follow your naming convention.  Then read it into Maple like this.

b:=readdata(`c:/test/sample.dat`,3):

nops(b)
               4580

pointplot3d(b)

In that case I only created 4580 pts but that works fine as well.  Perhaps you've already worked it out?  As Tim suggested posting your work even the data file you are pulling the data from will help us better resolve your problem. 

I suspect the problems you are having stem from the way your data file is formatted.  Sometimes if a file contains newline characters or carriage return characters unseen when you open the file, they can cause some havoc on your data when you try to manipulate them after reading them into maple.

Use the concatenation operator

As an example

for i from 1 to 5 do
  f||i;
end do

f1
f2
f3
f4
f5

I too experience the same thing.

Also sometimes pressing enter and it executes but the cursor appears no where, or it just executes into blank space.  I need to use the mouse and point to an area, usually the end of the document somewhere.  But these things seem to only happen after I have deleted some area, I'm backspacing or selecting areas of lines and deleting them. 

I can sometimes get back to normality by going above the problematic area insert a few lines below then go below the problematic area and insert a few lines above and use the mouse to select that area and delete it.  Doesn't always work I still sometimes get a line when I hit return the cursor seems to dissappear. 

Often I can use backspace to delete lines but there's some weird behaviour, I often need to cursor over and use the delete key instead of the backspace. 

In fact you're the first person who's ever brought this issue to attention.  I thought I was the only one experiencing it.  Document mode, yes of course problematic issues in that mode anyways, but that's besides the point.  If I can I will try to document the behaviour and figure out exactly what's happening unless someone else has already.  Sadly I'm in Maple 12 and no updates will be released to fix these older additions, which is unfortunate to say the least.  However I do believe these issues all exist in 13 and 14.