Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.

Prevodjenje u C!

[es] :: .NET :: Prevodjenje u C!

[ Pregleda: 1153 | Odgovora: 5 ] > FB > Twit

Postavi temu Odgovori

Autor

Pretraga teme: Traži
Markiranje Štampanje RSS

djordjevic_i
Ivan Djordjevic
Tf Cacak
Cacak

Član broj: 212093
Poruke: 176
109.93.242.*

Sajt: www.codeart.in.rs


+2 Profil

icon Prevodjenje u C!26.03.2010. u 16:35 - pre 184 meseci
Pozdrav ljudi, imam kod koji implementira Bajesovu metodu u otkrivanju spam-a(bar bi trebalo), ali je problem sto je pisan u VisualBasic-u, a ja sa njim nisam imamo dodira. Ako bi neko mogao da mi malo pojasni ovaj kod, bio bih neizmerno zahvalan, pa cu pokusati da ga odradim u C-u. Hvala. POzZ

Code (vbnet):

Imports System.IO
Imports MailBee.Mime
Imports MailBee.AntiSpam

Module Sample
    Sub Main(ByVal args() As String)
        Dim filter As BayesFilter = New BayesFilter()
        Dim msg As MailMessage = New MailMessage()

        filter.LoadDatabase("C:\AntiSpam\spam.dat", "C:\AntiSpam\nonspam.dat")

        ' Train Bayesian filter for spam messages.
        Dim files() As String = Directory.GetFiles("C:\AntiSpam\Spam", "*.eml")
        For Each file As String In files
            msg.LoadMessage(file)
            filter.TrainFilter(msg, True) ' Mark as spam.
        Next
       
        ' Train Bayesian filter for non-spam messages.
        files = Directory.GetFiles("C:\AntiSpam\NonSpam", "*.eml")
        For Each file As String In files
            msg.LoadMessage(file)
            filter.TrainFilter(msg, False) ' Mark as non-spam.
        Next
       
        ' Save Bayesian database to disk.
        filter.SaveDatabase("C:\AntiSpam\spam.dat", "C:\AntiSpam\nonspam.dat")
    End Sub
End Module



[Ovu poruku je menjao Shadowed dana 26.03.2010. u 19:46 GMT+1]
Ivan Djordjevic
 
Odgovor na temu

jablan

Član broj: 8286
Poruke: 4541



+711 Profil

icon Re: Prevodjenje u C!26.03.2010. u 16:39 - pre 184 meseci
Koja ti tačno linija nije jasna?
 
Odgovor na temu

djordjevic_i
Ivan Djordjevic
Tf Cacak
Cacak

Član broj: 212093
Poruke: 176
109.93.242.*

Sajt: www.codeart.in.rs


+2 Profil

icon Re: Prevodjenje u C!27.03.2010. u 00:39 - pre 184 meseci
Pa u sustini, ja mogu da nabadam, ali od velike pomoci bi mi bilo kad bi mi algoritam objasnio. Kazem ti, nikad dodira nisam imao sa ovim jezikom.
Ivan Djordjevic
 
Odgovor na temu

Shadowed
Vojvodina

Član broj: 649
Poruke: 12882



+4827 Profil

icon Re: Prevodjenje u C!27.03.2010. u 01:20 - pre 184 meseci
Pa, u stvari, ovde nemas nista narocito. Imas tu neku gotovu klasu koja uci iz primera, dva direktorijuma, jedan sa spam mail-ovima i jedan sa onima koji nisu. I onda uci taj filter tako sto mu da svaki od spam mail-ova uz parametar true (jeste spam) i svaki od ostalih uz parametar false.
Kako radi sam filer iz ovog koda se ne moze reci.
 
Odgovor na temu

djordjevic_i
Ivan Djordjevic
Tf Cacak
Cacak

Član broj: 212093
Poruke: 176
*.dynamic.isp.telekom.rs.

Sajt: www.codeart.in.rs


+2 Profil

icon Re: Prevodjenje u C!27.03.2010. u 13:44 - pre 184 meseci
E, hvala ti puno. Pazi, onoliko koliko sam mogao da protumacim kod, video sam da to nesto ne stima.Batali sve, krecem sam da iscitavam literaturu, pa se bacam na pisanje koda. Pozdrav
Ivan Djordjevic
 
Odgovor na temu

[es] :: .NET :: Prevodjenje u C!

[ Pregleda: 1153 | Odgovora: 5 ] > FB > Twit

Postavi temu Odgovori

Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.