Diskuze: F# a místní? Pojďme fsharpit + statistika z ITnetworku

Lako

Člen

Lako:13.2.2017 1:06

Ahoj.
Tak jsem zabředl do učby tohoto progresivního jazyka.
A zajímá mě, kolik zdejšího osazenstva přišlo s F# do styku, případně jej používá...

Jak se vám líbí, jaké je to v porovnání s ostatními jazyky? Používáte ho často?

Na úvod sem přikládám místní statistiku, která shrnuje kolik příspěvků připadá na jedno vlákno u klasických programovacích jazyků, tedy z této stránky
Výsledky:

11.43	Assembler
8.55	C a C++
8.43	.NET (C# a Visual Basic)
8.13	OstatnÃ programovacÃ jazyky
8.11	GameMaker
7.87	Java
7.32	Python
7.31	SQL a databÃ¡ze
6.82	Delphi (Pascal)
5.20	Petr

(bohužel se to moc nepopasovalo s diakritikou)
Přikládám zdroják obsahující 2 podobná řešení.

#r "..\packages\FSharp.Data.2.3.2\lib\\net40\FSharp.Data.dll"//cesta k Fsharp.Data.dll => nutné pouze pro skriptování
open FSharp.Data

type ItNetworkForumm = HtmlProvider<"http://www.itnetwork.cz/diskuzni-forum-o-programovani">

let klasickeJazyky = ItNetworkForumm.GetSample().Tables.``ProgramovÃ¡nÃ - klasickÃ© jazyky``//výběr tabulky

let pomery = klasickeJazyky.Rows |> Seq.map(fun x-> float x.``PÅÃspÄvkÅ¯`` / float x.``VlÃ¡ken``)//spočítáme poměr
    //poměr počtu příspěvků/počet vláken

let jazykyADiskuze = klasickeJazyky.Html.Descendants["a"] //najdi všechny odkazy
                        |> Seq.mapi(fun i q-> if  i % 2 = 1 then Some(q) else None)//každý druhý nebude None
                        |> Seq.choose id    //vyber jenom ty, které nejsou None
                        |> Seq.map (fun c -> c.InnerText()) //vyber text v elementu
                        |> Seq.zip pomery    //zazipuj (vztvoř tuple) s výše vytvořteným poměrem
                        |> Seq.sortByDescending(fun d -> fst d ) // vytřiď to podle prvního prvku v Tuplu
                        |> Seq.iter (fun p -> printf "%.2f \t %s \n" (fst p) (snd p)) //vzhledně vypiš
//řešení 2 : liší se v přístupu a ve výpisu
let jazykyADiskuze2 = klasickeJazyky.Html.Descendants["a"]
                        |> Seq.map (fun x->  x.Descendants["span"] )// najde spany v odkazech
                        |> Seq.choose (fun f-> if  Seq.isEmpty f then None else Some(f |> Seq.head) )//pokud span není, neberem
                        |> Seq.map (fun c -> c.InnerText())
                        |> Seq.zip pomery
                        |> Seq.sortByDescending(fun d -> fst d )
                        |> Seq.map (fun d -> snd d) //vytáhne pouze názvy jazyků (snd jako second z Tuplu)
                        |> printfn "%A" //vypsání celé sekvence

Jsem si jistý, že existuje lepší kód než ten můj. Pokud vás nějaký napadne, neváhejte ho k odpovědi přidat.

Na spoustě místech po internetech čítávám, že F# se může pyšnit skvělou a aktivní komunitou, pojďme jí rozšířit i na tuto síť...

Editováno 13.2.2017 1:07

Odpovědět

13.2.2017 1:06

Miroslav Husťák

Tvůrce

Miroslav Husťák:25.4.2021 0:02

Ahoj Lako, vydrželo ti to učení F#? Píšeš v něm programy? Také používáš https://fsharpforfunandprofit.com jakožto učebnici? Jelikož mi byla v době lockdownu pozastavena zakázka na neurčito, začal jsem se také věnovat F# (pouze funkcionálnímu programování, ne F# OOP, to považuji za zbytečné). Přestože se mi už povedlo v rámci výuky přepsat jeden svůj program do F#, netroufám si hodnotit tvůj kód. Je škoda, že na ITNetwork asi není moc Fšarpistů, ani fsharping.cz nevypadá příliš aktivní. Ve světě to asi bude jiné, zkusím nějakou LinkedIn group. Na funkcionálním programování vidím jeden obrovský problém, totiž ten, že už po dvou týdnech se mi nechce vracet se k C# a raději bych u funkcionálního programování zůstal navždy..... Seq.initInfinite (fun _ -> Console.ReadKey().Key) |> Seq.takeWhile ((<>) ConsoleKey.DokudNeumřu) |> Seq.iter (fun _ -> ())

Editováno 25.4.2021 0:03

Nahoru Odpovědět

25.4.2021 0:02

Lako

Člen

Lako:16.5.2021 20:56

To už je doba. Částečně ano, dotáhl jsem to do podoby, kdy jsem byl schopen cokoliv vymyslet. Bohužel jsem nenašel vhodný usecase na jazyk. Dneska je to například Blazor, kde se F# zase musí používat oklikou. Navíc se během té doby spousta kouzel z F# přesunula do C# (v poslední verzi například records). Mě se naopak líbí F# tím, že je objektový i funkcionální, můžeš použít to co se hodí.

Nahoru Odpovědět

16.5.2021 20:56

Naučíme tě pracovat na home-office.

Zjistit více...

Děláme co je v našich silách, aby byly zdejší diskuze co nejkvalitnější. Proto do nich také mohou přispívat pouze registrovaní členové. Pro zapojení do diskuze se přihlas. Pokud ještě nemáš účet, zaregistruj se, je to zdarma.

Zobrazeno 3 zpráv z 3.