Sponsored links: Algebra eBooks
 

Related

setify

D1:[[1, 5], [5, 1], [...

S1:setify(D1);

Calculate

setify

setify([1,-1,2,2,3,-3]);

Calculate

setify

setify([1,2,1,2,3,2,3]);

Calculate

setify

D1:[[1, 5], [5, 1], [...

S1:setify(D1);

Calculate

setify

setify([1,-1,2,2,3,-3]);

Calculate

setify

setify([1,2,1,2,3,2,3]);

Calculate

setify

Run Example
(%i1)expr:n;
(%o1)                                  n
(%i2) makelist(''expr, n, 1, 100);
(%o2) [1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 
21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 
40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 
59, 60, 61, 62, 63, 64, 65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 
78, 79, 80, 81, 82, 83, 84, 85, 86, 87, 88, 89, 90, 91, 92, 93, 94, 95, 96, 
97, 98, 99, 100]
(%i3) setify(makelist(''expr, n, 1, 100));
(%o3) {1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 
21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 
40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 
59, 60, 61, 62, 63, 64, 65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 
78, 79, 80, 81, 82, 83, 84, 85, 86, 87, 88, 89, 90, 91, 92, 93, 94, 95, 96, 
97, 98, 99, 100}
(%i4) 
Run Example
load(draw);
(%o1)            /usr/share/maxima/5.21.1/share/draw/draw.lisp
(%i2) coord: setify(makelist(k,k,-4,4));
(%o2)                 {- 4, - 3, - 2, - 1, 0, 1, 2, 3, 4}
(%i3) points2d: listify(cartesian_product (coord ,coord ));
(%o3) [[- 4, - 4], [- 4, - 3], [- 4, - 2], [- 4, - 1], [- 4, 0], [- 4, 1], 
[- 4, 2], [- 4, 3], [- 4, 4], [- 3, - 4], [- 3, - 3], [- 3, - 2], [- 3, - 1], 
[- 3, 0], [- 3, 1], [- 3, 2], [- 3, 3], [- 3, 4], [- 2, - 4], [- 2, - 3], 
[- 2, - 2], [- 2, - 1], [- 2, 0], [- 2, 1], [- 2, 2], [- 2, 3], [- 2, 4], 
[- 1, - 4], [- 1, - 3], [- 1, - 2], [- 1, - 1], [- 1, 0], [- 1, 1], [- 1, 2], 
[- 1, 3], [- 1, 4], [0, - 4], [0, - 3], [0, - 2], [0, - 1], [0, 0], [0, 1], 
[0, 2], [0, 3], [0, 4], [1, - 4], [1, - 3], [1, - 2], [1, - 1], [1, 0], 
[1, 1], [1, 2], [1, 3], [1, 4], [2, - 4], [2, - 3], [2, - 2], [2, - 1], 
[2, 0], [2, 1], [2, 2], [2, 3], [2, 4], [3, - 4], [3, - 3], [3, - 2], 
[3, - 1], [3, 0], [3, 1], [3, 2], [3, 3], [3, 4], [4, - 4], [4, - 3], 
[4, - 2], [4, - 1], [4, 0], [4, 1], [4, 2], [4, 3], [4, 4]]
(%i4) vf2d(x,y):=  vector ([x,y],[cos(y),x]/6);
                                                [cos(y), x]
(%o4)              vf2d(x, y) := vector([x, y], -----------)
                                                     6
(%i5) vect2: makelist(vf2d(k[1],k[2]),k,points2d );
                           cos(4)    2                        cos(3)    2
(%o5) [vector([- 4, - 4], [------, - -]), vector([- 4, - 3], [------, - -]), 
                             6       3                          6       3
                    cos(2)    2                        cos(1)    2
vector([- 4, - 2], [------, - -]), vector([- 4, - 1], [------, - -]), 
                      6       3                          6       3
                  1    2                      cos(1)    2
vector([- 4, 0], [-, - -]), vector([- 4, 1], [------, - -]), 
                  6    3                        6       3
                  cos(2)    2                      cos(3)    2
vector([- 4, 2], [------, - -]), vector([- 4, 3], [------, - -]), 
                    6       3                        6       3
                  cos(4)    2                        cos(4)    1
vector([- 4, 4], [------, - -]), vector([- 3, - 4], [------, - -]), 
                    6       3                          6       2
                    cos(3)    1                        cos(2)    1
vector([- 3, - 3], [------, - -]), vector([- 3, - 2], [------, - -]), 
                      6       2                          6       2
                    cos(1)    1                      1    1
vector([- 3, - 1], [------, - -]), vector([- 3, 0], [-, - -]), 
                      6       2                      6    2
                  cos(1)    1                      cos(2)    1
vector([- 3, 1], [------, - -]), vector([- 3, 2], [------, - -]), 
                    6       2                        6       2
                  cos(3)    1                      cos(4)    1
vector([- 3, 3], [------, - -]), vector([- 3, 4], [------, - -]), 
                    6       2                        6       2
                    cos(4)    1                        cos(3)    1
vector([- 2, - 4], [------, - -]), vector([- 2, - 3], [------, - -]), 
                      6       3                          6       3
                    cos(2)    1                        cos(1)    1
vector([- 2, - 2], [------, - -]), vector([- 2, - 1], [------, - -]), 
                      6       3                          6       3
                  1    1                      cos(1)    1
vector([- 2, 0], [-, - -]), vector([- 2, 1], [------, - -]), 
                  6    3                        6       3
                  cos(2)    1                      cos(3)    1
vector([- 2, 2], [------, - -]), vector([- 2, 3], [------, - -]), 
                    6       3                        6       3
                  cos(4)    1                        cos(4)    1
vector([- 2, 4], [------, - -]), vector([- 1, - 4], [------, - -]), 
                    6       3                          6       6
                    cos(3)    1                        cos(2)    1
vector([- 1, - 3], [------, - -]), vector([- 1, - 2], [------, - -]), 
                      6       6                          6       6
                    cos(1)    1                      1    1
vector([- 1, - 1], [------, - -]), vector([- 1, 0], [-, - -]), 
                      6       6                      6    6
                  cos(1)    1                      cos(2)    1
vector([- 1, 1], [------, - -]), vector([- 1, 2], [------, - -]), 
                    6       6                        6       6
                  cos(3)    1                      cos(4)    1
vector([- 1, 3], [------, - -]), vector([- 1, 4], [------, - -]), 
                    6       6                        6       6
                  cos(4)                         cos(3)
vector([0, - 4], [------, 0]), vector([0, - 3], [------, 0]), 
                    6                              6
                  cos(2)                         cos(1)
vector([0, - 2], [------, 0]), vector([0, - 1], [------, 0]), 
                    6                              6
                1                       cos(1)
vector([0, 0], [-, 0]), vector([0, 1], [------, 0]), 
                6                         6
                cos(2)                       cos(3)
vector([0, 2], [------, 0]), vector([0, 3], [------, 0]), 
                  6                            6
                cos(4)                         cos(4)  1
vector([0, 4], [------, 0]), vector([1, - 4], [------, -]), 
                  6                              6     6
                  cos(3)  1                      cos(2)  1
vector([1, - 3], [------, -]), vector([1, - 2], [------, -]), 
                    6     6                        6     6
                  cos(1)  1                    1  1
vector([1, - 1], [------, -]), vector([1, 0], [-, -]), 
                    6     6                    6  6
                cos(1)  1                    cos(2)  1
vector([1, 1], [------, -]), vector([1, 2], [------, -]), 
                  6     6                      6     6
                cos(3)  1                    cos(4)  1
vector([1, 3], [------, -]), vector([1, 4], [------, -]), 
                  6     6                      6     6
                  cos(4)  1                      cos(3)  1
vector([2, - 4], [------, -]), vector([2, - 3], [------, -]), 
                    6     3                        6     3
                  cos(2)  1                      cos(1)  1
vector([2, - 2], [------, -]), vector([2, - 1], [------, -]), 
                    6     3                        6     3
                1  1                    cos(1)  1
vector([2, 0], [-, -]), vector([2, 1], [------, -]), 
                6  3                      6     3
                cos(2)  1                    cos(3)  1
vector([2, 2], [------, -]), vector([2, 3], [------, -]), 
                  6     3                      6     3
                cos(4)  1                      cos(4)  1
vector([2, 4], [------, -]), vector([3, - 4], [------, -]), 
                  6     3                        6     2
                  cos(3)  1                      cos(2)  1
vector([3, - 3], [------, -]), vector([3, - 2], [------, -]), 
                    6     2                        6     2
                  cos(1)  1                    1  1
vector([3, - 1], [------, -]), vector([3, 0], [-, -]), 
                    6     2                    6  2
                cos(1)  1                    cos(2)  1
vector([3, 1], [------, -]), vector([3, 2], [------, -]), 
                  6     2                      6     2
                cos(3)  1                    cos(4)  1
vector([3, 3], [------, -]), vector([3, 4], [------, -]), 
                  6     2                      6     2
                  cos(4)  2                      cos(3)  2
vector([4, - 4], [------, -]), vector([4, - 3], [------, -]), 
                    6     3                        6     3
                  cos(2)  2                      cos(1)  2
vector([4, - 2], [------, -]), vector([4, - 1], [------, -]), 
                    6     3                        6     3
                1  2                    cos(1)  2
vector([4, 0], [-, -]), vector([4, 1], [------, -]), 
                6  3                      6     3
                cos(2)  2                    cos(3)  2
vector([4, 2], [------, -]), vector([4, 3], [------, -]), 
                  6     3                      6     3
                cos(4)  2
vector([4, 4], [------, -])]
                  6     3
(%i6) apply(draw2d , append ([ color=blue], vect2 ));
(%o6) [gr2d(vector, vector, vector, vector, vector, vector, vector, vector, 
vector, vector, vector, vector, vector, vector, vector, vector, vector, 
vector, vector, vector, vector, vector, vector, vector, vector, vector, 
vector, vector, vector, vector, vector, vector, vector, vector, vector, 
vector, vector, vector, vector, vector, vector, vector, vector, vector, 
vector, vector, vector, vector, vector, vector, vector, vector, vector, 
vector, vector, vector, vector, vector, vector, vector, vector, vector, 
vector, vector, vector, vector, vector, vector, vector, vector, vector, 
vector, vector, vector, vector, vector, vector, vector, vector, vector, 
vector)]
(%i7) 
Run Example
load(basic);
define: warning: redefining the built-in function prog1
define: warning: redefining the built-in function symbolcheck
define: warning: redefining the built-in function push
define: warning: redefining the built-in function pop
define: warning: redefining the built-in function tr_ev
(%o1)           /usr/share/maxima/5.21.1/share/macro/basic.mac
(%i2) load(functs);
(%o2)      /usr/share/maxima/5.21.1/share/simplification/functs.mac
(%i3)  ratprint:false;
(%o3)                                false
(%i4) setify(makelist(1/k, k, 1, ceiling(rat(0.1))));
(%o4)                                 {1}
(%i5) 
[abs,listify,map,powerset,setify] [addrow,listify,makelist,matrix,powerset,rank,setify] [append,apply,cartesian_product,cos,diff,draw,imagpart,integrate,listify,load,makelist,plot2d,product,realpart,setify,subst] [append,apply,cartesian_product,cos,draw,listify,load,makelist,product,setify] [append,block,lambda,listify,makelist,map,primep,rest,return,setify] [append,block,listify,makelist,map,primep,rest,return,setify] [append,block,listify,makelist,primep,rest,return,setify] [append,block,listify,makelist,primep,return,setify] [append,cardinality,disp,setify] [append,cardinality,setify] [append,disjoin,first,if,lambda,listify,makelist,map,mod,setify,subset] [append,disp,intersect,listify,lmax,setify] [append,disp,setify] [append,length,setify] [append,listify,setify,sort,sqrt,transpose] [cardinality,cartesian_product,length,makelist,product,setify] [cardinality,cartesian_product,makelist,product,setify] [cartesian_product,full_listify,length,listify,product,setify] [cartesian_product,lambda,makelist,product,setify,subset] [disjoin,first,if,lambda,listify,makelist,map,mod,setify,subset] [disjoin,first,if,lambda,makelist,map,mod,setify,subset] [display,length,listify,makelist,map,powerset,setify,sort,sqrt] [do,evenp,first,if,lambda,makelist,map,return,setify,subset] [do,evenp,first,if,lambda,makelist,map,setify,subset] [do,evenp,first,lambda,makelist,map,return,setify,subset] [ev,if,length,setify] [ev,lambda,listify,maplist,setify,solve] [ev,lambda,listify,maplist,setify] [ev,length,setify] [eval_string,flatten,full_listify,lambda,listify,lreduce,maplist,mod,permut,powerset,setify,sort,string] [evenp,first,if,lambda,makelist,map,rest,setify,subset] [evenp,first,if,lambda,makelist,map,setify,subset] [evenp,first,lambda,makelist,map,setify,subset] [evenp,if,lambda,makelist,map,setify,subset] [evenp,lambda,makelist,map,setify,subset] [expand,maplist,setify,solve] [first,if,lambda,makelist,map,mod,setify,subset] [first,if,lambda,makelist,map,setify,subset] [lambda,makelist,map,setify] [length,listify,makelist,map,powerset,setify,sort,sqrt] [length,listify,makelist,map,powerset,setify] [listify,makelist,map,powerset,setify,sqrt] [listify,makelist,matrix,powerset,print,rank,setdifference,setify] [listify,makelist,matrix,powerset,print,rank,setify] [listify,makelist,matrix,powerset,rank,setdifference,setify] [listify,map,powerset,setify] [listify,maplist,setify] [makelist,setify] [maplist,setify,solve] [setify]

Related Help

Help for Setify