Jak ustawić wiersz MatrixForm poziomo jako wektor wiersza rzeczywistego, a nie pionowo jako wektor kolumnowy?

Question

Czy istnieje sposób, aby MatrixForm wyświetlał wektor wiersza poziomo na linii, a nie w pionie, tak jak ma to miejsce w przypadku wektorów kolumn? To czasami mnie martwi. Czy myślisz, że trudno będzie napisać wrapper do formularza matrycy, aby dostosować to zachowanie?

Na przykład tutaj mamy matrycę 2 na 2. Wiersze wyświetlają się tak samo, jak kolumny. Oba są pokazane pionowo.

Pytanie: Czy jest możliwe, aby MatrixForm wyświetlania wektory wierszy określonymi poziomo i pionowo, nie?

Przepraszam, jeśli wcześniej zapytano, szybkie wyszukiwanie nic nie pokazuje.

dzięki

zmiana (1)

fyi, to jest w Matlab, drukuje wiersze poziomo i pionowo kolumny automatycznie, że liczy na coś takiego. Ale na razie użyję sugestii Heike'a, ponieważ rozwiązuje to kosztem dodatkowego pisania.

Update (2) Stosując rozwiązanie Hilderyk jest również miły, zawsze miałem twardy czas drukowania matrycę 3D w taki sposób, że można go odczytać. Tutaj jest teraz za pomocą {} sztuczkę

Answer 1

Zarówno arrayname[[All,1]] i arrayname[[1,All]], Part dostarcza wektor i MatrixForm nie ma możliwości określenia, które „orientacja” ma. Odpowiednio, zawsze drukuje wektory jako kolumny.

O jedyne co można zrobić, to podać swoje własne procedury wyjściowy dla wektorów rzędu, np owijając go w liście otaczającej, przekształcając go z powrotem do (pojedynczym rzędzie) matryca:

rowVector[a_List] := MatrixForm[{a}] 
columnVector = MatrixForm (*for symmetry*) 

Od Ciebie zależy jednak, czy wektor pochodzi z wiersza lub kolumny.

Answer 2

Albo może po prostu gotować własną funkcję RowForm, np .:

RowForm[(m_)?VectorQ] := Row[{"(",Row[m," "], 
    ")"}, "\[MediumSpace]"]; 

Następnie

RowForm[twoRowsMatrix[[All,1]]] 

wygląda rodzaju O.K.

Ewentualnie, jeśli naprawdę zależy na wyświetlanie wektorów, można zrobić:

twoRowsMatrix = {{a11, a12}, {a21, a22}}; 

TakeColumn[m_?MatrixQ, i_] := (Print[MatrixForm[#]]; #) &@m[[All, i]]; 
TakeRow[m_?MatrixQ, i_] := (Print[MatrixForm[{#}]]; #) &@m[[i]]; 
TakeColumn[twoRowsMatrix, 1] 
TakeRow[twoRowsMatrix, 1] 

Answer 3

Jeśli nie dbają o () części, a następnie można dodać z ,{}, zawinąć w nawiasach klamrowych, a używać TableForm lub Grid zamiast:

vec = {x, y, z}; 
TableForm[{vec, {}}] 
Grid[{vec, {}}] 

Answer 4

Kiedy się martwić o to, używam {{a, b, c}}, aby określić wiersz a, b, c (mogą być wszelkiego rodzaju listy) i Transponuj [{{a, b, c}}], aby określić kolumnę a, b, c.

MatrixForm[a = RandomInteger[{0, 6}, {2, 2}]] 
MatrixForm[b = RandomInteger[{0, 6}, {2, 2}]] 
MatrixForm[c = RandomInteger[{0, 6}, {2, 2}]] 
w = {a, b, c}; 
MatrixForm[w] 
w = {{a, b, c}}; 
MatrixForm[w] 
w = Transpose[{{a, b, c}}]; 
MatrixForm[w]