Un sacco di struttura ad albero può essere riutilizzato. Non conosco la complessità algoritmica a priori, direi che in media c'è solo il logor ammortizzato 'spreco' ...
Perché non provare a scrivere un programma su misura? (Vedremo se riesco a stasera per provare io stesso motivati.)
EDIT
Ok, qui è qualcosa che ho violato. Non ho deciso se ci sono dati utili qui o no.
open System
let rng = new Random()
let shuffle (array : _[]) =
let n = array.Length
for x in 1..n do
let i = n-x
let j = rng.Next(i+1)
let tmp = array.[i]
array.[i] <- array.[j]
array.[j] <- tmp
let TryTwoToThe k =
let N = pown 2 k
GC.Collect()
let a = Array.init N id
let makeRandomTreeAndDiscard() =
shuffle a
let mutable m = Map.empty
for i in 0..N-1 do
m <- m.Add(i,i)
for i in 1..20 do
makeRandomTreeAndDiscard()
for i in 1..20 do
makeRandomTreeAndDiscard()
for i in 1..20 do
makeRandomTreeAndDiscard()
#time
// run these as separate interactions
printfn "16"
TryTwoToThe 16
printfn "17"
TryTwoToThe 17
printfn "18"
TryTwoToThe 18
Quando ho eseguito questo FSI sulla mia macchina, ottengo
--> Timing now on
>
16
Real: 00:00:08.079, CPU: 00:00:08.062, GC gen0: 677, gen1: 30, gen2: 1
>
17
Real: 00:00:17.144, CPU: 00:00:17.218, GC gen0: 1482, gen1: 47, gen2: 4
>
18
Real: 00:00:37.790, CPU: 00:00:38.421, GC gen0: 3400, gen1: 1059, gen2: 17
che suggerisce la memoria può essere scalando super-lineare, ma non troppo male. Presumo che le collezioni gen0 siano approssimativamente un buon proxy per lo "spreco" del riequilibrio dell'albero. Ma è tardi, quindi non sono sicuro di averlo pensato abbastanza bene. :)
Esistono anche diverse implementazioni di mappe. Quello descritto su http://fsprojects.github.io/FSharpx.Collections/PersistentHashMap.html utilizza un "trie mappato Hash array" e necessita di luppaggi log32N.Questo può essere considerato come O (1) per tutti i problemi pratici. – forki23