Användarbidrag av Anders

Från Täpp-Anders
En användare med 1 554 redigeringar. Konto skapat 31 januari 2013.
Hoppa till navigeringHoppa till sök
Sök efter användarbidragVisaDölj
⧼contribs-top⧽
⧼contribs-date⧽
(nyaste | äldsta) Visa (50 nyare | ) (20 | 50 | 100 | 250 | 500)

10 april 2026

7 april 2026

6 april 2026

5 april 2026

  • 14.175 april 2026 kl. 14.17 skillnad historik +62 Racket/Erastothenes Ingen redigeringssammanfattning senaste
  • 13.015 april 2026 kl. 13.01 skillnad historik +7 320 N Racket/Posits Skapade sidan med '<pre> #lang racket ;;;;; ;; En enkel implementation av Posists eller Unum typ III ;; i Racket för skojs skull och för att lära sig mer ;; ;; Täpp-Anders Sikvall anders@sikvall.se 2026-04-04 ;; ;; Posit representeras som ett heltal (bitmönster, 0 till 2^n-1). ;; Parametrar: n = totalt antal bits, es = antal exponent-bits (t.ex. n=16, es=1 för posit16). ;; Innehåller: ;; * Konvertering till/från generiska tal (number->posit och posit->number) ;; * Addition, subt...' senaste
  • 13.015 april 2026 kl. 13.01 skillnad historik +9 924 N Racket/Neural Skapade sidan med '<pre> #lang racket ;;;;; ;; Neuralt nät implementerad i Racket ;; Täpp-Anders Sikvall 2026-04-03 anders@sikvall.se ;;;;; ;;;;; NEURALT NÄT ;;; ;; Detta program implementerar ett litet neuralt nät och tränar det på sannings- ;; tabellen för XOR. Efter några tusen epoker ska prediktionerna ligga extremt nära ;; följande: ;; ;; a,b → a XOR b ;; 0,0 → 0 ;; 0,1 → 1 ;; 1,0 → 1 ;; 1,1 → 0 ;; ;; Implementationen har två input-neuroner för a...' senaste
  • 13.005 april 2026 kl. 13.00 skillnad historik +3 437 N Racket/Genetic Skapade sidan med '<pre> #lang racket ;;;;; ;; Genetisk algoritm implementerad i Racket ;; Täpp-Anders Sikvall 2026-04-03 anders@sikvall.se ;;;;; ;; ================================================================ ;; Genetisk algoritm – Hitta kromosom med: ;; 1. De första 10 bitarna = 1 ;; 2. Totalt antal 1:or så nära 50 som möjligt ;; ================================================================ ;; --------------------- Parametrar --------------------- (define populatio...' senaste
  • 12.595 april 2026 kl. 12.59 skillnad historik +2 737 N Racket/Lille-GUI Skapade sidan med '<pre> #lang racket/gui ;;;;; ;; Riktigt Enkelt GUI-Demo implementerad i Racket ;; Täpp-Anders Sikvall 2026-04-03 anders@sikvall.se ;;;;; ;; Skapa huvudfönstret (define frame (new frame% [label "Racket GUI Demo"] [width 520] [height 420])) ;; Meny (define menu-bar (new menu-bar% [parent frame])) (define menu-file (new menu% [label "Arkiv"] [parent menu-bar])) (new menu-item% [label "Öppna..."] [parent menu-file] [callback (λ (i e) (mess...' senaste
  • 12.595 april 2026 kl. 12.59 skillnad historik +7 511 N Racket/Personreg Skapade sidan med '<pre> #lang racket ;;;;; ;; Enkel personinfodatabas implementerad i Racket ;; Täpp-Anders Sikvall 2026-04-03 anders@sikvall.se ;;;;; ;; Global lista som håller alla personer, just nu tom (define personer '()) ;; Skapa en person med namngivna parametrar (define (skapa-person #:förnamn förnamn #:efternamn efternamn #:ålder ålder #:stad [stad ""] ;Valfria parametrar med defaultvärden #:telefon [telefon ""])...' senaste
  • 12.585 april 2026 kl. 12.58 skillnad historik +3 394 N Racket/Hexdump Skapade sidan med '<pre> #lang racket ;;;;; ;; Hexdump implementerad i Racket ;; Täpp-Anders Sikvall 2026-04-03 anders@sikvall.se ;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;; ;; SYNOPSIS ;; racket hexdump.rkt [ OPTIONS ] filename ;; ;; OPTIONS ;; -h Gives a short help text to the utility ;; --bytes-per-line, -n Determines how many bytes are decoded per line (default 16) ;; --hex, -x Show only hex dump ;; --ascii, -a...' senaste
  • 12.575 april 2026 kl. 12.57 skillnad historik +1 080 N Racket/Erastothenes Skapade sidan med '<pre> #lang racket ;;;;; ;; Erastothenes såll implementerad i Racket ;; Täpp-Anders Sikvall 2026-04-03 anders@sikvall.se ;;;;; (define (primes-between start stop) (cond [(> start stop) '()] [else ; Skapa en bool-vektor för intervallet [0..stop] (define sieve (make-vector (+ stop 1) #t)) ; 0 och 1 är inte primtal (vector-set! sieve 0 #f) (vector-set! sieve 1 #f) ; Såll: markera multiplar ; Går från 2 till (...'
  • 12.555 april 2026 kl. 12.55 skillnad historik +2 516 N Racket/Multitråd Skapade sidan med '<pre>#lang racket ;;;;; ;; Multitrådad demo ;; Täpp-Anders Sikvall, anders@sikvall.se, 2006-04-04 ;; Racketkurs. ;; Simulerar tidsödande arbete genom att pausa tråden en slumpmässig tid (define (random-sleep min-sec max-sec) (sleep (+ min-sec (* (random) (- max-sec min-sec))))) ;; En arbetare körs i en egen tråd och lyssnar på work-channel (define (start-worker id work-channel result-channel) (thread (λ () (let loop () ;; Vänta på att f...' senaste
  • 12.355 april 2026 kl. 12.35 skillnad historik −24 Racket Kodexempel (Sommarhack 2026)
  • 12.325 april 2026 kl. 12.32 skillnad historik +48 Racket Kodexempel (Sommarhack 2026)
  • 03.085 april 2026 kl. 03.08 skillnad historik +22 Racket Kodexempel (Sommarhack 2026)
  • 02.525 april 2026 kl. 02.52 skillnad historik +6 959 N Racket/6502-emu Skapade sidan med '<pre> #lang racket ;; ================================================ ;; Enkel 6502-emulator skriven i Racket ;; ================================================ ;; Detta är en grundläggande men fullt fungerande emulator för 6502-processorn. ;; Den hanterar minne (64 KB), register, stack, flaggor och ett grundläggande ;; set av instruktioner. Du kan lätt utöka den med fler opkoder. ;; ;; Instruktioner som stöds i denna version (kan utökas i cpu-step): ;; - $0...' senaste

4 april 2026

3 april 2026

1 mars 2026

  • 13.431 mars 2026 kl. 13.43 skillnad historik +921 N Microsoft Windows Skapade sidan med '= Tips & Tricks = == Dual boot gets time zone wrong == When dual booting windows with Linux or BSD on the same machine the other operating systems keep the real time clock (RTC) in UTC while windows likes to keep it in local time. This means that if you set windows to UTC it works fine but if you have a different time zone windows will come up with UTC time but displayed as if you were in a different time zone. This means here in Europe you would have CET/CEST as time...' senaste

15 februari 2026

  • 17.0115 februari 2026 kl. 17.01 skillnad historik −112 Legion 5 Sparläge på batteriet senaste
  • 16.5715 februari 2026 kl. 16.57 skillnad historik +912 N Legion 5 Skapade sidan med '= Lenovo Legion 5 = == Tips och Tricks == === Batteriladdning === Det finns i dag inget Lenovo Vantage för att styra batteriladdningen ordentligt i Linux men det går att styra vissa saker ändå. ==== Sparläge på batteriet ==== I detta läget så laddas laptopen max till 80% och min till 60% när den är ansluten för att minska slitaget på batteriet. Slå på det med: <pre> sudo bash -c 'echo 1 > /sys/bus/platform/drivers/ideapad_acpi/VPC2004:00/conservati...'

11 juni 2025

10 juni 2025

9 juni 2025

4 juni 2025

3 juni 2025

24 maj 2025

  • 23.2324 maj 2025 kl. 23.23 skillnad historik +252 N Bandbredd Skapade sidan med '{{ofärdig}} Bandbredd är ett begrepp inom radio som beskriver hur bred en signal, ett filter, en förstärkare eller liknande frekvensberoende komponenter. Det finns många olika bandbreddsbegrepp och jag kommer efter hand ta upp fler och fler här.' senaste

23 maj 2025

5 maj 2025

(nyaste | äldsta) Visa (50 nyare | ) (20 | 50 | 100 | 250 | 500)