Module:PrevalenceData

Documentation for this module may be created at Module:PrevalenceData/doc

-- This module is specifically the Wikidata property "prevalence" (P1193), due
-- to its particular need for ranges and area-based qualifiers, and the lack of
-- support for these in the main Wikidata module.

-- Completely untested.
local p = {}

--local wikidata = require( 'Module:Wikidata' )

p.main = function ( frame )
     --local entity = mw.wikibase.getEntity( 'Q133087' )
     local entity = mw.wikibase.getEntity( frame.args.qId or nil )
     if entity then
          local prevalenceClaims = entity.claims and entity.claims.P1193
          -- TODO: Get best claim, not always just the first one.
          -- Probably use getBestStatements.
          if prevalenceClaims then
               local pRange = ''
               -- Run through all prevalence claims
               for i, prevalenceClaim in pairs( prevalenceClaims ) do
                    local prevalenceValue = prevalenceClaim.mainsnak.datavalue.value
                    if prevalenceValue then
                         if string.len( pRange ) > 0 then
                              -- Split multiple claims
                              -- Maybe line break instead?
                              pRange = pRange .. ', '
                         end
                         local lowerBound = prevalenceValue.lowerBound * 100
                         local upperBound = prevalenceValue.upperBound * 100
                         pRange = pRange .. lowerBound
                         if lowerBound ~= upperBound then
                              pRange = pRange .. ' to ' .. upperBound
                         end
                         
                         pRange = pRange .. '%'
                         if prevalenceClaim.qualifiers then
                              -- Qualifiers for prevalence are currently unstandardized.
                              -- Keep guessing until the right one is found.
                              local quals = prevalenceClaim.qualifiers.P276 or -- location
                                   prevalenceClaim.qualifiers.P1001 or          -- applies to jurisdiction
                                   prevalenceClaim.qualifiers.P17               -- country
                              if quals then
                                   pRange = pRange .. ' ('
                                   for k, qual in pairs(quals) do
                                        if k > 1 then
                                             pRange = pRange .. ', '
                                        end
                                        local qualId = qual.datavalue.value[ 'numeric-id' ]
                                        local link = mw.wikibase.sitelink( 'Q' .. qualId )
                                        local label = ({
                                             -- Certain geographic locales might need a
                                             -- manual-ish override for labels. 
                                             [ 132453 ] = 'developed world'
                                        })[ qualId ] or mw.wikibase.label( 'Q' .. qualId )
                                        if link then
                                             label = '[[' .. link .. '|' .. label .. ']]'
                                        end
                                        pRange = pRange .. label
                                        
                                   end
                                   pRange = pRange .. ')'
                              end
                         end
                    end
                    --[[
                    -- Todo: References
                    if prevalenceClaim.references then 
                         
                    end
                    ]]--
                    
               end
               return pRange
          end
     end
     return ''
end

return p