Read text into matrix

tri_text.r

triangle <- as.matrix(read.table(text = "
357848 1124788 1735330 2218270 2745596 3319994 3466336 3606286 3833515 3901463
352118 1236139 2170033 3353322 3799067 4120063 4647867 4914039 5339085     NaN
290507 1292306 2218525 3000000 3985995 4132918 4628910 4909315     NaN     NaN
310608 1418858 2195047 3757447 4029929 4381982 4588268     NaN     NaN     NaN
443160 1136350 2128333 2897821 3402672 3873311     NaN     NaN     NaN     NaN
396132 1333217 2180715 2985752 3691712     NaN     NaN     NaN     NaN     NaN
440832 1288463 2419861 3483130     NaN     NaN     NaN     NaN     NaN     NaN
359480 1421128 2864498     NaN     NaN     NaN     NaN     NaN     NaN     NaN
376686 1363294     NaN     NaN     NaN     NaN     NaN     NaN     NaN     NaN
344014     NaN     NaN     NaN     NaN     NaN     NaN     NaN     NaN     NaN
"))