setting size of images which are result of TextRecognize

Question

Im learning Mathematica and the Wolfram language for shot time by myself. Its a pain for me that many settings are somehow hidden. Now I spent hours to find solution for something I already did with success, but now I can not remeber. When I disassemble a scanned text by use of TextRecognize up to the level of Character (but the same is for Word) then the cropped sub-images of individual letters have different (automatic) size. For me this is nonsense to see a dot in simillar size like character let say "a". I would like to get the cropped images of letters in original size or in same size. Here example of code:

image = Import["https://i.sstatic.net/8Vb9o.png"];

dsChars = TextRecognize[image, "Character", {"Image", "Text"}] // Dataset

Which brings this result:

I would like to see the characters in the first collumn being of simillar size - for example the "e" in 5th row to be same height like the "m" in 6th row ... I will appreciate your time and effort for any advice and help.

EDIT 16.5.18 18:18 CEST For to show what I mean when I say that I want to see the sub-images in proportion, here is a sample what I can do with a list of sub-images:

Image[Normal[dsChars[{1, 2}, 1]], Magnification -> 1]

here the "M" is in proportion to "a"

However how to change appearance of the sub-images in the first collumn of the "printout" of the dataset dsChars ?

EDIT 2 17.5.18, 17:24 CEST I edited the title - removed unnecessary last part " /and potentially for one column of Dataset / " of the title which was too long

Answer 1

You can simply set ImageSizeMultipliers -> 1 for the Dataset:

Style[Dataset[dsChars2], ImageSizeMultipliers -> 1]

Answer 2

In the meantime I found quite acceptable answer (solution 1) to my question and SquareOne tuned it to two additional, perfect answers (solution 2 and 3).

For this case:

image = Import["https://i.sstatic.net/8Vb9o.png"];
dsChars = TextRecognize[image, "Character", {"Image", "Text"}]

my solution is (solution 1):

Transpose[{Image[dsChars[[All, 1]], Magnification -> 1], dsChars[[All, 2]]}] // Dataset

But @SquareOne simplified this solution very nice to (solution 2):

dsChars /. x_Image :> Image[x, Magnification -> 1]// Dataset

which seems to me much better solution as it does not need Transpositions.

Also @SquareOne draw my attention to the fact that if the "image" which I let TextRecognized was already provided with property of Magnification->1, then the resulting sub-images of individual characters will come out from the Textrecognize properly.

Therefore this is an equally perfect solution too (solution 3):

image = Image[Import["https://i.sstatic.net/8Vb9o.png"], Magnification -> 1];
dsChars = TextRecognize[image, "Character", {"Image", "Text"}]// Dataset

All those solutions are giving following, for me perfectly reasonable output:

If @SquareOne created the Solution 2 and Solution 3 as his separate answers, I would be happy marking them both as perfect answers for my question.

Answer 3

If I understand well, maybe this:

given

image = Import["https://i.sstatic.net/8Vb9o.png"]
dsChars = TextRecognize[image, "Character", {"Image", "Text"}]

then

 MapAt[ImagePad[#, 
    Transpose@
     Through[{Floor, Ceiling}[({30, 30} - ImageDimensions[#])/2]]] &, 
  dsChars, {All, 1}] // Dataset

Answer 4

image = Import["https://i.sstatic.net/8Vb9o.png"]
dsChars = TextRecognize[image, "Character", {"Image", "Text"}]
dsChars2 = Transpose[{ImageResize[#, {20}] & /@ dsChars[[All, 1]], 
dsChars[[All, 2]]}] // Dataset

This forces each thumbnail to have a maximal width or height of at most 20 pixels. You could also want to set a height of 20 pixels for each e.g.