Re: perl6 matrix arrayof arrays

cannot use @arr[0].elems : gives an error

Like @arr vs $#arr in Perl, I'm guessing @arr[0].elems was causing warnings for accessing the element just after the end of an array.

A possible alternative coding:

use v6;

my  @arr  = [
    [ 1.1,2.2,3.3,4.4,5.5 ],
    [ 10,20,30,40,50 ],
    [ 100,200,300,400,500 ],
    [ 1000,2000,3000,4000,5000 ],
];

dd @arr; # dump the matrix

for @arr {
      say ( .map: {.fmt: "%7.1f\t"} ).join
}

say "=======\t" x @arr[0].elems;
say ( (0..@arr[0].end).map: {@arr[*; $_].sum.fmt("%7.1f\t")} ).join;
#say ( ([Z] @arr).map: { .sum.fmt("%7.1f\t") } ).join;
[download]

Ron

Comment on Re: perl6 matrix arrayof arrays Select or Download Code

Replies are listed 'Best First'.
Re^2: perl6 matrix arrayof arrays by Anonymous Monk on Mar 22, 2018 at 14:31 UTC
hello Ron Thanks for you're reply. As i said : just starting with perl6. Learning from the docs is not easy. But what you showed me was easy to understand wanted to use the + in calculating the totals of each column. The way with sum is new to me. Thanks for showing this option to do it an other way..	[reply]
Re^3: perl6 matrix arrayof arrays by mr_ron (Deacon) on Mar 22, 2018 at 19:13 UTC
Since you describe the "docs" as "not easy", I am concerned that you are only looking at docs.perl6.org and not also looking at the tutorial level information at perl6.org/resources. Have you looked at tutorials or introductory books? A review of the tutorials led me to refine: `for @arr { say ( .map: {.fmt: "%7.1f\t"} ).join }` [download] to be `for @arr { say ($_>>.fmt: "%7.1f\t" ).join }` [download] Ron	[reply] [d/l] [select]