Perl PDL клей не работает? - PullRequest
Новая
       19

Perl PDL клей не работает?

2 голосов
/ 20 декабря 2011

Я новичок в PDL и, пожалуйста, прости мой элементарный вопрос:

У меня есть два простых объекта pdl 

pdl> p $a                                                                                                                    

[
  [1 2 3]
  [4 5 6]
]

pdl> p $c                                                                                                                    
[6 6 6]

Я склеиваю их вместе и возвращаю то, что ожидаю 

pdl> p glue $b, $c                                                                                                           

 [
  [1 2 3]
  [4 5 6]
 ]
 [6 6 6]

Однако, когда я назначаю клей переменной $ z, клей не прилипает.

 $z = glue $b, $c  


 pdl> p $z                                                                                                                    

 [
  [1 2 3]
  [4 5 6]
 ]

Чего мне не хватает?

Моя конечная цель состоит в том, чтобы создать большую подставку, просматривая файл с помощью клея, кошки или добавления.

1 Ответ

3 голосов
/ 20 декабря 2011

Это не так, как вы используете glue(). Из документов :

$ c = $ a-> клей (, $ b, ...)

Полагаю, вам придется сделать что-то вроде $z = $b->glue(1,$c). Я немного не уверен насчет параметра <dim>; попробуйте поиграть с этим и посмотреть, что получится.

Редактировать: Да, вы бы использовали <dim> из 1: 

pdl> $a = pdl [[1,2,3],[4,5,6]];

pdl> p $a

[
 [1 2 3]
 [4 5 6]
]

pdl> $c = pdl [6,6,6];

pdl> p $c
[6 6 6]
pdl> $z = $a->glue(1,$c);

pdl> p $z

[
 [1 2 3]
 [4 5 6]
 [6 6 6]
]
...