Это связано с внутрестайной агрессией.
Улыбка - это вероятнее всего изначальный оскал.
Бывает несколько вариантов шуток.
Самая простая это когда кто-то, но не ты конечно, теряет статус внутри стаи. Например, поскользнулся на банановой кожуре и упал. Классическая шутка.
Но если персонаж унижения сам заржет от ситуации, то это показывает, что его как бы переводит в круг ржущих над унижением, из круга униженных, не всегда, но часто.
Или как-то по другому потерял статус. Анекдот про то, как "застряла лосиха в дерев и все звери её ..."
Второй вариант юмора "я тебя раскусил", это когда тебя на серьезных щах говорят что-то, а ты очевидно видишь в этом ложь. Лесли Нилсон когда делает что-то серьезное, а это крайне несерьезно, например. Или лысый маленький комик, который рассказывает, что он сейчас просто в гриме, а так он вообще не лысый, а кудрявый блондин двухметрового роста.
Третье. Это огда кто-то что-то делает как-то так, как не делают другие, что смешно, потому, что он показывает свою неумелость, нелепость и это опускает его статус. Например, Шелдон Купер из ТБВ, он много чего делал не по нормальному.
Еще один похожий вариант юмора - это неожиданное решение в ситуации, неожиданный ход действий, но обязательно с унижением или нелепостью кого-то, все вариации на тему неожиданных ситуаций из КВН или стендаперов. Женский стендап, пример, унижение мужчин из-за того, что они что-то не так делают.
В некоторых случаях достаточно моделирования ситуации придумывания небылиц, про токак есть или что кто и как делает, смотрите Азамат Харламов как они "разгоняют" какую-то фразу или реплику, придумывают её продолжение, тот же тип юмора, что и предыдущий.
Есть еще "сплетни". Когда какому-нибудь персонажу кто-то приписывается какие-то унизительные или оскорбительные качества.
Весь остальной юмор это вариации этих элементов.
Возможно что-то упустил, конечно, вспомню допишу.