R HEAD WEB FIGURE CODE