charts - F# Live Charting Parallel -



charts - F# Live Charting Parallel -

i learning utilize f# live charting , having difficulty making code go parallel.

i have code wrote help examples google searches.

module livechartdata = allow sampleddata (tuple) (t:int) = allow name = tuple |> fst allow stat = tuple |> snd allow x = [for in all.getcolumn<float>((name,stat)).keys -> i.toshortdatestring()] allow y = all.getcolumn<float>((name,stat)) |> series.fillmissingwith 0. |> series.values allow obs = seq { in (seq.zip x y) thread.sleep t yield (i) } |> seq.cache |> seq.observe "" + name + "-" + stat + "",obs allow datasort (id:string) = allow name = all.columnkeys |> seq.map fst |> seq.distinct |> seq.tolist allow stat = all.columnkeys |> seq.map snd |> seq.distinct |> seq.tolist [|for in name j in stat -> (i,j)|] |> array.filter (fun -> (i |> snd) = id) allow prepdata (stats:string) = [|for in (datasort stats) -> i|] |> array.map (fun -> allow info = livechartdata.sampleddata 200 livechart.fastlineincremental(data |> snd,data |> fst)) |> chart.combine allow charting_s= [|for in ["col1"; "col2";"col3";"col4"; "col5"] -> i|] |> array.map (fun -> prepdata i) |> chart.rows

when alter array.map array.parallel.map next error.

system.invalidoperationexception: chart area axes - minimum , maximum axis values have not been specified.

also got

system.invalidoperationexception: collection modified; enumeration operation may not execute.

trying create other parts parallel other errors too. seems problem arises when feeding info livechart.fastlineincremental in parallel. think code benefit sort of async process dont know how incorporate this.

any help appreciated.

this code works fine is, want utilize cores.

try moving array.parallel.map 1 level creating info in parallel, , creating chart lines on same thread.

something this:

let prepdata (stats:string) = [|for in (datasort stats) -> i|] |> array.parallel.map (fun -> livechartdata.sampledata 200) |> array.map (fun info -> livechart.fastlineincremental(data |> snd, info |> fst))

charts parallel-processing f# deedle

Comments

Post a Comment

Popular posts from this blog

Delphi change the assembly code of a running process -

Delphi change the assembly code of a running process - i'm trying alter address 00741fa5 has push test.009e721c . alter push test.009e71c8 . procedure callback; asm force $9e71c8 end; procedure tform2.btn1click(sender: tobject); var ppid :dword; pprocess : cardinal; begin getwindowthreadprocessid(findwindow(nil,pchar('test')), @ppid); pprocess := openprocess(process_all_access, false, ppid); injectasm(pprocess, $741fa5, 10, integer(@callback), 0); end; here injectasm function (with error checking) function injectasm(process: longword; injectaddress, injectsize, codeaddress, codesize : integer): pointer; var csize, rsize : integer; replaced : array of byte; jmp : array [0..4] of byte; jmpaddress : integer; nopv : byte; : integer; nbr: ulong_ptr; begin //injectsize must equal or greater 5, because need space our //(far) jmp wwxxyyzz instruction //if there's no space, inject in place of few instructions if injectsize ...
Read more

json - Hibernate and Jackson (java.lang.IllegalStateException: Cannot call sendError() after the response has been committed) -

json - Hibernate and Jackson (java.lang.IllegalStateException: Cannot call sendError() after the response has been committed) - hello have problem hibernate , jackson. have 2 pojos @entity @table(name = "users") public class user implements serializable { static final long serialversionuid = 4235637833262722256l; @id @generatedvalue private int id; @column(name = "creation_date") private date creationdate; @column(name = "first_name") private string firstname; @column(name = "last_name") private string lastname; @version @column(name = "version") private int version; @column(name = "e_mail") private string email; @column(name = "enabled") private boolean enabled; @column(name = "login") private string login; @column(name = "password") private string password; @jsonmanagedreference("role") @onetomany(mappedby = "user", cascade = cascadetype.all,fetch = fetchtyp...
Read more

C++ 11 "class" keyword -

C++ 11 "class" keyword - i've started using c++ 11 little bit more , have few questions on special uses of class keyword. know it's used declare class, there's 2 instances have seen don't understand: method<class t>(); and class class_name *var; why precede typename keyword class in first example, , keyword pointer in sec example? that known elaborated type specifier , necessary when class name "shadowed" or "hidden" , need explicit. class t { }; // love of god don't t t; t t2; if compiler smart, give these warnings: main.cpp:15:5: error: must utilize 'class' tag refer type 't' in scope t t2; ^ class main.cpp:14:7: note: class 't' hidden non-type declaration of 't' here t t; ^ if class not defined, deed forwards declaration. for example: template <typename t> void method() { using type = typename t::value_type; } method...
Read more