PSO算法R实现

这是为了用R练手写的代码；原代码是《Matlab在数学建模中的应用》的第八章第一个代码；代码里解决了一个求函数最优值的简单问题，我用R语言重写了一次，但是有一点提升就是，我将原代码进行了改进，原代码自变量如果再加的话需要改代码，但是我将代码改成了矩阵形式，所以不用管自变量了，再次调用只需要改一下适应度计算函数就可以。另外，，注释我也稍微加了一些，更加明了。