R中的矩阵计算

求教：R中怎么计算含有未知字母的矩阵运算
         如：B=（z-1）*A，矩阵A都是数值，计算时说“ 二进列运算符中有非数值参数”
               然后怎么算B的行列式，要求出一个含有Z的多项式

det(B)=(z-1)^n * det(A)
n是A的维数

如果要求出当z知道时的行列式，可以这样做，但是得不到关于z的多项式
sol=function(z)
{
A=matrix(1:4,2,2)
B=(z-1)*A
HLS=det(B);HLS
}
sol(2)