I want to find the position of letter i in each word of a text. Take their positions and then sum them up. Example, in simplicity, the score will be 2+6+8=16. In this way, I calculate the score for all words and then sum the scores.
I wrote the following codes till now, but unable to combine them.
Data = "Simplicity and Importance are classic and ironic" TextWords[Data] Transpose[StringPosition[ToString[Data], "I"]][] Transpose[StringPosition[ToString[Data], "i"]][]