Cool post, thank you for sharing! If any of you want some entertaining videos about actually eating some of the hotter peppers, you need to check out these episodes of Good Mythical Morning (ordered by ascending Scoville heat of the peppers involved):

The Spicy Pepper Challenge

The Ghost Pepper Challenge

The Carolina Reaper Challenge

Thanks for your comment! Yes the tooltip works, when I put the cursor over the pepper icons, I got a pic of the corresponding sort. But in the original message (at the top of this conversation) the cursor moves by itself. If I copy the link of this conversation to a web browser, it still works the same way (by the way this is how I shared it on Facebook). And for this to work, one does not even need to have cdf player or Mathematica, I checked in on such computers. So the code behind how the "self-going" animation above must be different from the notebook that Jofre shared. This is the point that I do not understand.

I see. Bernat, it is me who thanks - it was most useful! Not only for understanding it, but also for the tip on the LICEcap screen capture. So far I only used QuickTime for dynamic screen capture, but it does not make GIF animations that are suitable for inclusion in html files. I downloaded and tested LICEcap, and could reconstruct the animation. I really appreciate your help!

Nice interactive ListLogPlot! Thanks for sharing it, Jofre.

I found it interesting that pepper varieties that take longer to mature tend to score higher SHU values:

ListLogPlot[
 Table[Normal[GroupBy[peppers, "type"][i][All, Tooltip[{#days, 1 + #scoville}, #variety] &]], {i, 3}], 
 PlotRange -> All, 
 AxesLabel -> {Style["Days to Mature", 12, Bold], Style["Scoville heat units
    (SHU)", 12, Red, Bold]}, 
 PlotMarkers -> {Red, Darker@Green, Orange}, 
 PlotLegends -> {"Hot", "Sweet", "Mild"}, ImageSize -> 500]

Another observation made is that the hot type of peppers are predominantly reddish:

Table[Labeled[ImageCollage[Normal[GroupBy[peppers, "type"][i][All, "image"]]], {"Hot", "Sweet", "Mild"}[[i]]], {i, 3}]

Table[{"Hot", "Sweet", "Mild"}[[i]] -> 
  Part[DominantColors[
    ImageCollage[RemoveAlphaChannel[#, Transparent] & /@ RemoveBackground /@ Normal[GroupBy[peppers, "type"][i][All, "image"]]], 3], 2 ;; 3], {i, 3}]

And sweet peppers are best suited for salads as their WordCloud of comments indicates:

Table[Labeled[
  WordCloud[
   DeleteStopwords@StringJoin[Riffle[Normal[GroupBy[peppers, "type"][i][All, "comments"]], " "]]], {"Hot", "Sweet", "Mild"}[[i]]], {i, 3}]