Help needed with equation and plotting using WolframAlpha or Player

Some time ago I bumped to this formula:

Sin[x]*((Cos[2*Pi*k*Cos[x]]*(HarmonicNumber[k*Cos[x] - 3/4] - HarmonicNumber[k*Cos[x] - 1/4]))/Pi + 1)

in some thread at StackExchange. As I don’t have access to Mathematica software, I have to try use WolframAlpha for to plot the resulting wave form. I don’t know what the parameter k holds in (it was not mentioned in original post) and what other needs to be done to get the wave form plotted using WolframAlpha. Any help is appreciated.

EDIT: I have access to Wolfram Player but, that would need a supported format (.nb, .cdf or .nbp) file to be opened.