我试图通过翻译我很久以前写的一些Haskell代码来学习F#,但是我被卡住了!
percent :: Int -> Int -> Float
percent a b = (fromInt a / fromInt b) * 100
freqs :: String -> [Float]
freqs ws = [percent (count x ws) (lowers ws) | x <- ['a' .. 'z']]
我成功了:
let percent a b = (float a / float b) * 100.
虽然我不喜欢必须拥有。在100之后。
我在freqs
中执行的操作的名称是什么,如何将其翻译为F#?
修改:count
和lowers
分别为Char -> String -> Int
和String -> Int
,我已经翻译了这些内容。
由于
答案 0 :(得分:13)
这是一个列表理解,在F#中它看起来像下面的最后两行:
// stub out since dunno implementation
let count (c:char) (s:string) = 4
let lowers (s:string) = 10
// your code
let percent a b = (float a / float b) * 100.
let freq ws = [for x in ['a'..'z'] do
yield percent (count x ws) (lowers ws)]
更一般地说,我认为Haskell列表推导具有下面示例所建议的形式,并且显示了相应的F#。
// Haskell
// [e(x,y) | x <- l1, y <- l2, pred(x,y)]
// F#
[for x in l1 do
for y in l2 do
if pred(x,y) then
yield e(x,y)]
答案 1 :(得分:0)
请注意Brian的F#代码:
let freq ws = [for x in ['a'..'z'] do yield percent (count x ws) (lowers ws)]
可以更优雅地写成:
let freq ws = [for x in 'a'..'z' -> percent (count x ws) (lowers ws)]