Skip to contents

Function allsymbols() returns a character vector whose entries include all symbols of its argument.

Usage

allsymbols(a)

Arguments

a

Object of class aaa

Value

Returns a character vector

Author

Robin K. S. Hankin

Examples

a <- raaaa()
a
#> free antiassociative algebra element:
#> +13a +13b +27c +14d +5e +12f +22g +20h +10i +31j +5a.b +7a.d +5a.e +6a.f +5b.e
#> +16b.h +1b.j +6c.a +8c.c +8c.i +7c.j +1d.i +5d.j +7e.c +8e.f +4e.i +3f.f +3f.h
#> +7f.i +4g.a +10g.d +2g.j +5h.i +4h.j +4i.a +4j.a +3j.h +8j.j +6(a.a)e +3(a.g)e
#> +1(a.g)h +10(b.b)j +3(b.d)h +4(b.h)f +4(c.e)g +6(c.i)e +10(d.d)d +3(d.d)i
#> +8(e.b)b +10(e.c)g +6(e.i)e +7(f.a)c +5(f.f)c +9(f.f)f +6(f.f)i +4(f.i)b
#> +7(g.g)d +4(g.h)e +9(h.d)b +10(h.f)g +6(h.g)d +9(i.d)c +9(i.d)j +7(i.f)h
#> +8(j.e)i +10(j.g)h +7(j.h)c +9(j.h)j
allsymbols(a)
#>  [1] "a" "b" "c" "d" "e" "f" "g" "h" "i" "j"

a[cbind(allsymbols(a))] == single(a)
#> [1] TRUE