minutes922.mws

>   

minutes922.mws
Thu Sep 22 10:38:00 MDT 2005

>    restart;

>    with(plots, display);

[display]

##############################################

>    dwim := 6;

dwim := 6

####################  Maple Range

>    Mrange := -5..dwim;

Mrange := -5 .. 6

>    #plot( t -> t^2, Mrange);;

>    22/7..exp(3);

22/7 .. exp(3)

>    evalf(%);

3.142857143 .. 20.08553692

>    #plot( t -> t^2, %);

>    100..-9;

100 .. -9

>    dwim..dwim^3;

6 .. 216

>    nerk := plot( t ->t^2/5, Mrange):

>    #display(nerk);

####################################################
 Maple Sequences

>    Mseq := eenie, meenie, meinie, moe;

Mseq := eenie, meenie, meinie, moe

>    Mseq[3];

meinie

>    Mseq[2..4];

meenie, meinie, moe

>    Mseq[15];  # Mseq[-3];

Error, invalid subscript selector

###################################################

 

Maple List

>    Mlist := [J,A,S,O,N];

Mlist := [J, A, S, O, N]

>    Mlist[3];

S

>    op(Mlist);   Is a sequence.

J, A, S, O, N

>    nops(Mlist);

5

>    nops(Mseq);

Error, invalid input: nops expects 1 argument, but received 4

>    nops([Mseq]);  Mseq;   GHT := [Mseq];

4

eenie, meenie, meinie, moe

GHT := [eenie, meenie, meinie, moe]

##################################################

 Maple Sets -- don'r depend on a particular order

>    Mset := {is,are,was,were,have,has,had};

Mset := {has, is, were, have, are, was, had}

>    Mset[4];

have

>    Nset := {1,2,3,have,7,have,3,4,5,5,5,5,5,5,5,are, 3,7,8,9,3};   Extirpated duplicates

Nset := {1, 2, 3, 4, 5, 7, 8, 9, have, are}

>    Nlist := [1,2,3,have,7,have,3,4,5,5,5,5,5,5,5,are, 3,7,8,9,3];

Nlist := [1, 2, 3, have, 7, have, 3, 4, 5, 5, 5, 5, 5, 5, 5, are, 3, 7, 8, 9, 3]
Nlist := [1, 2, 3, have, 7, have, 3, 4, 5, 5, 5, 5, 5, 5, 5, are, 3, 7, 8, 9, 3]
Nlist := [1, 2, 3, have, 7, have, 3, 4, 5, 5, 5, 5, 5, 5, 5, are, 3, 7, 8, 9, 3]

>    Nset intersect Mset;

{have, are}

>    A intersect B;
A union B;
A minus B;

`intersect`(B,A)

`union`(B,A)

`minus`(A,B)

>    Mset minus Nset;

{has, is, were, was, had}

#############################################

sEQUENCE dETAILS

>    MSeq := seq(k^3, k=Mrange);  Mrange;

MSeq := -125, -64, -27, -8, -1, 0, 1, 8, 27, 64, 125, 216

-5 .. 6

>    seq(sin(k*Pi/2), k=-3..9);

1, 0, -1, 0, 1, 0, -1, 0, 1, 0, -1, 0, 1

>    seq(sin(k*Pi), k=-3..9);

0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0

>    seq(k, k=floor(exp(1))..ceiling(Pi^3));

Error, unable to execute seq

>    seq(k, k=2/3..22/7);   New one!!!

2/3, 5/3, 8/3

>    MSeq;  Mseq;

-125, -64, -27, -8, -1, 0, 1, 8, 27, 64, 125, 216

eenie, meenie, meinie, moe

>    MSeq,  Mseq;   #Concatenated sequences

-125, -64, -27, -8, -1, 0, 1, 8, 27, 64, 125, 216, eenie, meenie, meinie, moe
-125, -64, -27, -8, -1, 0, 1, 8, 27, 64, 125, 216, eenie, meenie, meinie, moe

>    MSeq := MSeq, 729;    Append

MSeq := -125, -64, -27, -8, -1, 0, 1, 8, 27, 64, 125, 216, 729

>    MSeq := 1024, MSeq;   Prepend

MSeq := 1024, -125, -64, -27, -8, -1, 0, 1, 8, 27, 64, 125, 216, 729
MSeq := 1024, -125, -64, -27, -8, -1, 0, 1, 8, 27, 64, 125, 216, 729

########################################

>    seq( t^2, t=0..6);

0, 1, 4, 9, 16, 25, 36

>    seq( t^2, t=6..0);   No values generated ( "for loop")

>    poo := NULL;    Empty sequence

poo := NULL

>    poo := poo, 4,5,7,3;

poo := 4, 5, 7, 3

#####################################################

>    seq( ithprime(i), i=1..15);

2, 3, 5, 7, 11, 13, 17, 19, 23, 29, 31, 37, 41, 43, 47

>    ithprime(2005);

17431

################################################

Random Sequences

>    randomize():   Shuffle the deck

>    rand();

580009965852

>    rand();rand();rand();rand();rand();

870934566382

293467640680

807186075606

102645796672

584452255338

>    Katrina := seq( floor( rand()/10^11  ), i=1..10);

Katrina := 9, 8, 1, 3, 2, 0, 9, 9, 4, 4

>   

>   

>   

#################################################

List Stuff

#############################################
 Set Stuff