如何创建单行相关图

Question

是否有一种简单的方法只在R中生成一行相关图？例如，使用corrgram包可以非常简单地创建一个漂亮的相关图。

library(corrgram)
corrgram(iris, upper.panel=panel.pie)

就我的目的而言，我所关心的只是顶行，是否有一种简单的方法可以在R中产生这样的数字？