Haskell在字符串中的位置

我试图制作一个程序，接收一个字符串并返回前5个位置和后5个位置的Cs和Gs百分比，如果字符串少于20个字符，函数应返回完整序列中的百分比。 然而，我已经能够让你给我的只是Cs和Gs的百分比，但我不知道如何检查前5个位置和决赛

function' :: [Char] -> Double
function' xs = fromIntegral final0 / fromIntegral final1
                where final0 = length $ filter (\x-> x == 'C'|| x == 'G') xs
                      final1 = length xs

---

您可以使用

take 5s

获取字符串

s

的前5个元素，使用

take 5$reverse s

获取最后5个元素

您可以使用

take 5s

获取字符串

s

的前5个元素，使用

take 5$reverse s

获取最后5个元素