如何将Double转换为Data？

Question

我想迅速将Double转换为Data

我试图将其转换为UInt，但我不知道该怎么去：

let aDouble: Double = 2.0
let aUInt: UInt = aDouble.bitPattern
let theData: Data = ???

如何将双精度数转换为Data？而Data又回到了两倍？

如果可能，数据应具有固定长度，例如4个字节左右。