Artifact 5e8ca33d42616cc901aec030b2def8d7c79093b57fb0a6666b42f66ab503d400:
- File mtt/lib/control/PPP/laguerre_matrix.m — part of check-in [af3953deae] at 2021-03-01 11:39:42 on branch master — Cleanup repository after cvs2git conversion. (user: jeff@gridfinity.com, size: 392) [annotate] [blame] [check-ins using] [more...]
- File mttroot/mtt/lib/control/PPP/laguerre_matrix.m — part of check-in [d12f66ccef] at 2002-04-28 15:35:24 on branch origin/master — Returns empty matrix when first parameter <1 (user: gawthrop@users.sourceforge.net, size: 392) [annotate] [blame] [check-ins using]
function A = laguerre_matrix (n,p) ## usage: A = laguerre_matrix (n,p) ## ## A-matrix for generating nth order Laguerre functions with parameter p ## Copyright (C) 1999 by Peter J. Gawthrop if n<1 # Creatre empty matrix A = []; else # Create A matrix A = diag(-p*ones(n,1)); for i=1:n-1 A = A + diag(-2*p*ones(n-i,1),-i); endfor endif endfunction