Trovare l'indice dell'elemento in una lista in Haskell?

Question

Ho una funzione in Haskell che trova il valore massimo di un elevamento a potenza da una lista:

prob99 = maximum $ map (\xs -> (head xs)^(head (tail xs))) numbers 

Che cosa ho bisogno di trovare è la posizione di questo valore massimo nella lista risultante. Come andrei su questo?

Edit: ho trovato una soluzione che va in questo modo:

n = [[519432,525806],[632382,518061].... 
prob99b [a,b] = b* (log a) 
answer = snd $ maximum (zip (map prob99b n) [1..]) 

Answer 1

Come trovare l'indice dell'elemento massimo? Che ne dici di provare tutti gli indici e verificare se sono il massimo?

ghci> let maxIndex xs = head $ filter ((== maximum xs) . (xs !!)) [0..] 

Ma questo suona come qualcosa per cui esiste già una funzione. Il mio codice sarà più leggibile, manutenibile e probabilmente anche più efficiente, se avessi usato la funzione esistente.

Quindi dovrei solo chiedere SO come farlo, e in 15 minuti riceverò una risposta e alcuni commenti snarky. O - Potrei chiedere Hoogle e ottenere una risposta utile diementicato (come suggerito Will)

$ hoogle "Ord a => [a] -> Int" | head 

<Nothing relevant> 

$ # hmm, so no function to give me the index of maximum outright, 
$ # but how about finding a specific element, and I give it the maximum? 
$ hoogle "a -> [a] -> Int" | head 
Data.List elemIndex :: Eq a => a -> [a] -> Maybe Int 
Data.List elemIndices :: Eq a => a -> [a] -> [Int] 

Answer 2

import Data.List 
elemIndex 'b' "abc" === Just 1 

Davvero un buon strumento per la ricerca di funzioni di Haskell è Hoogle. Permette di cercare per tipo di firma tra le altre cose.

Se si desidera eseguire tutto in un unico passaggio, si consiglia Data.List.mapAccumL, passando l'indice del numero più grande trovato finora lungo l'accumulatore.

Answer 3

Questo probabilmente non merita di essere in una risposta di suo, ma non posso commentare ancora. In ogni caso, ecco come avrei scritto questo:

import Data.List 
import Data.Ord 

maxIndex :: Ord a => [a] -> Int 
maxIndex = fst . maximumBy (comparing snd) . zip [0..] 

Answer 4

Se si sta facendo il calcolo numerico in Haskell, si potrebbe voler guardare in librerie che rendono più facile e più efficiente. Per esempio hmatrix ha un metodo per maxIndex efficienti Vector s, la documentazione di cui è qui: https://hackage.haskell.org/package/hmatrix-0.17.0.1/docs/Numeric-LinearAlgebra-Data.html#g:14

> maxIndex $ vector [1, 3, 2] 
1 

I nomi esatti dei metodi erano diversi in cui la questione è stata originariamente chiesto, ma la biblioteca era intorno allora troppo.