如何在R中创建几何级数序列?