参考如下：
<br />
utils:::menuInstallLocal()<br />
程序包'ggplot2'打开成功，MD5和检查也通过<br />
> local({pkg <- select.list(sort(.packages(all.available = TRUE)),graphics=TRUE)<br />
+ if(nchar(pkg)) library(pkg, character.only=TRUE)})<br />
错误: 找不到'ggplot2'所需要的程辑包'reshape'<br />
> utils:::menuInstallLocal()<br />
程序包'reshape'打开成功，MD5和检查也通过<br />
> local({pkg <- select.list(sort(.packages(all.available = TRUE)),graphics=TRUE)<br />
+ if(nchar(pkg)) library(pkg, character.only=TRUE)})<br />
载入需要的程辑包：reshape<br />
载入需要的程辑包：plyr<br />
错误: 无法载入程辑包'plyr'<br />
此外: 警告信息：<br />
In library(pkg, character.only = TRUE, logical.return = TRUE, lib.loc = lib.loc) :<br />
不存在叫'plyr'这个名字的程辑包<br />
> utils:::menuInstallLocal()<br />
程序包'plyr'打开成功，MD5和检查也通过<br />
> local({pkg <- select.list(sort(.packages(all.available = TRUE)),graphics=TRUE)<br />
+ if(nchar(pkg)) library(pkg, character.only=TRUE)})<br />
载入需要的程辑包：reshape<br />
载入需要的程辑包：plyr</p>
<p>载入程辑包：'reshape'</p>
<p>The following object(s) are masked from 'package:plyr':</p>
<p> round_any</p>
<p>载入需要的程辑包：grid<br />
载入需要的程辑包：proto<br />
错误: 无法载入程辑包'proto'<br />
此外: 警告信息：<br />
In library(pkg, character.only = TRUE, logical.return = TRUE, lib.loc = lib.loc) :<br />
不存在叫'proto'这个名字的程辑包</p>
<p>
</p>
