Considérant en fait et en droit :
1.
X._ a formé un recours en matière pénale au Tribunal fédéral contre le jugement de la Cour d'appel pénale du Tribunal cantonal du canton de Vaud du 16 août 2018, par lequel il a notamment été condamné, pour lésions corporelles simples, omission de prêter secours et insoumission à une décision de l'autorité, à une peine privative de liberté de douze mois, avec sursis portant sur six mois durant cinq ans, et par lequel un traitement ambulatoire a été ordonné en sa faveur.
2.
La partie qui saisit le Tribunal fédéral doit fournir une avance de frais d'un montant correspondant aux frais judiciaires présumés (<ref-law>). Le juge instructeur fixe un délai approprié pour fournir l'avance de frais. Si le versement n'est pas fait dans ce délai, il fixe un délai supplémentaire. Si l'avance n'est pas versée dans ce second délai, le recours est irrecevable (<ref-law>).
En l'espèce, par ordonnance du 6 décembre 2018, le recourant a été invité à verser, jusqu'au 7 janvier 2019, une avance de frais de 800 francs. Ce montant n'ayant pas été payé dans le délai imparti, l'intéressé a été derechef invité, par ordonnance du 14 janvier 2019, à verser l'avance de frais précitée. A nouveau, le recourant n'a pas effectué le versement en question dans le délai imparti. Le recours doit ainsi être déclaré irrecevable conformément à l'<ref-law> et selon la procédure simplifiée prévue à l'<ref-law>.
3.
Le recourant, qui ainsi succombe, supporte les frais judiciaires (cf. <ref-law>).


Par ces motifs, le Président prononce :
1.
Le recours est irrecevable.
2.
Les frais judiciaires, arrêtés à 500 francs, sont mis à la charge du recourant.
3.
Le présent arrêt est communiqué aux parties et à la Cour d'appel pénale du Tribunal cantonal du canton de Vaud.
Lausanne, le 31 janvier 2019
Au nom de la Cour de droit pénal
du Tribunal fédéral suisse
Le Président : Denys
Le Greffier : Graa