Haskell中如何将列表单个元素左移或右移？示例及优化咨询

嘿，我来帮你搞定这个小问题！你想要把列表[1,10,4,5,3]里的元素5左移一位变成[1,10,5,4,3]，核心思路其实很清晰——找到目标元素的位置，然后和它前一位的元素交换就行。你之前用交换类方法效果不好，大概率是没做好索引有效性的判断，或者没正确定位到元素的位置。

我给你分步骤拆解，再附上几种常见语言的代码示例：

核心步骤 #

• 第一步：找到目标元素（这里是5）在列表中的索引位置
• 第二步：判断这个索引是否大于0（毕竟第一个元素没法再左移了）
• 第三步：如果满足条件，就将目标元素和它前一位的元素交换位置

Swift 代码示例 #

var numbers = [1, 10, 4, 5, 3]
// 找到元素5的索引，同时处理元素不存在的情况
if let targetIndex = numbers.firstIndex(of: 5), targetIndex > 0 {
    numbers.swapAt(targetIndex, targetIndex - 1)
}
print(numbers) // 输出: [1, 10, 5, 4, 3]

Python 代码示例 #

numbers = [1, 10, 4, 5, 3]
try:
    target_index = numbers.index(5)
    if target_index > 0:
        # 直接交换两个位置的元素
        numbers[target_index], numbers[target_index - 1] = numbers[target_index - 1], numbers[target_index]
except ValueError:
    # 如果列表里没有5，就什么也不做
    pass
print(numbers) # 输出: [1, 10, 5, 4, 3]

小提醒 #

如果你的列表里有多个5，上面的代码只会处理第一个出现的5。要是需要处理所有的5，那就要循环遍历列表，逐个判断交换啦。

内容的提问来源于stack exchange，提问作者Uğurcan Şahin