search for: bn1994

...each output as demonstrated below. How can I generate this (and similar) result(s) without all the trailing NULLs? > lapply(ls(pattern='bn'), function(x) cat(x, dim(get(x)), "\t", names(get(x)), "\n")) bn1993 2885 11 oplt rplt rsiz tree bd ht oaz odst raz rdst spr bn1994 3158 7 oplt tree bd ht spr stat dam bn1995 734 7 oplt tree bd ht spr stat dam bn1996 293 7 oplt tree bd ht spr stat dam bn1997 264 7 oplt tree bd ht spr stat dam bn1998 768 7 oplt tree bd ht spr stat dam bn1999 654 7 oplt tree bd ht dbh stat dam bn2003 1407 9 oplt tr...